Clase StyleSheets (Word VBA)

Una colección de objetos StyleSheet que representa las hojas de estilos en cascada adjuntas a un documento. Para usar una variable de clase StyleSheets, primero debe ser instanciado, por ejemplo

Dim sss as StyleSheets
Set sss = ActiveDocument.StyleSheets

For Each

A continuación, se muestra un ejemplo de cómo procesar los elementos StyleSheets en una colección.

Dim sst As StyleSheet
For Each sst In ActiveDocument.StyleSheets
	
Next sst

Add

Devuelve un objeto StyleSheet que representa una nueva hoja de estilos agregada a un documento Web.

Add (FileName, LinkType, Title, Precedence)

Sub NewStylesheet() 
 ActiveDocument.StyleSheets.Add _ 
 FileName:="c:\WebSite.css", _ 
 Precedence:=wdStyleSheetPrecedenceHighest, _ 
 LinkType:=wdStyleSheetLinkTypeLinked, _ 
 Title:="Test Stylesheet" 
End Sub

Arguments

Estos son los argumentos con nombre :

FileName (String) - Ruta de acceso y nombre del archivo de la hoja de estilos en cascada.

LinkType (WdStyleSheetLinkType) - Indica si la hoja de estilos debe agregarse como un vínculo o importarse al documento Web.

Posibles valores de retorno son wdStyleSheetLinkTypeImported - Hoja de estilos interna importada, wdStyleSheetLinkTypeLinked - Hoja de estilos externa vinculada.

Title (String) - Nombre de la hoja de estilos.

Precedence (WdStyleSheetPrecedence) - Indica el nivel de importancia comparado con otras hojas de estilos en cascada adjuntas al documento Web.

Valores posibles son

Count

Devuelve un Long que representa el número de hojas de estilo de la colección.

Dim lngCount As Long
lngCount = ActiveDocument.StyleSheets.Count

Item

Devuelve un objeto StyleSheet individual de una colección.

Item (Index)

Index: El objeto individual que se va a devolver.

Dim sst As StyleSheet
Set sst = ActiveDocument.StyleSheets(Index:=1)