Clase StyleSheet - hoja de estilos en cascada (Word VBA)

La clase StyleSheet representa una sola hoja de estilos en cascada adjunta a un documento Web. Para usar una variable de clase StyleSheet, primero debe ser instanciado, por ejemplo


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

For Each

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


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

Delete

Elimina la hoja de estilos en cascada especificada.


ActiveDocument.StyleSheets(1).Delete

FullName

Especifica el nombre de una hoja de estilos en cascada, incluida la unidad o ruta de acceso Web.

Uso de esta propiedad es equivalente a usar las propiedades Path, PathSeparator y Name en secuencia.


Sub CSSName() 
 MsgBox ActiveDocument.StyleSheets(1).FullName 
End Sub

Index

Devuelve un valor de tipo Long que representa la posición de un elemento en una colección.


Dim lngIndex As Long
lngIndex = ActiveDocument.StyleSheets(1).Index

Move

Mueve el orden de precedencia de una hoja de estilos.

Move (Precedence)

Precedence: Nivel de precedencia.


ActiveDocument.StyleSheets(1).Move Precedence:=wdStyleSheetPrecedenceHigher

Name

Devuelve el nombre del objeto especificado.


Dim strName As String
strName = ActiveDocument.StyleSheets(1).Name

Path

Devuelve el disco o la ruta de acceso Web a la hoja de estilos especificada.

La ruta de acceso no incluye un carácter final, por ejemplo, "C:\MSOffice" o "https://MyServer".


Dim strPath As String
strPath = ActiveDocument.StyleSheets(1).Path

Title

Devuelve o establece una cadena que representa el título de una hoja de estilos Web.


Sub AssignCSSTitle() 
 ActiveDocument.StyleSheets.Item(1).Title = "New Look Stylesheet" 
 ActiveDocument.StyleSheets.Item(2).Title = "Standard Web Stylesheet" 
 ActiveDocument.StyleSheets.Item(3).Title = "Definitions Stylesheets" 
End Sub

Type

Devuelve o establece el tipo de hoja de estilo. Posibles valores de retorno son wdStyleSheetLinkTypeImported - Hoja de estilos interna importada, wdStyleSheetLinkTypeLinked - Hoja de estilos externa vinculada.


ActiveDocument.StyleSheets(1).Type = wdStyleSheetLinkTypeImported