Classe Styles (Word VBA)
Collection d’objets style qui représentent les styles prédéfinis et définis par l’utilisateur dans un document. Pour utiliser une variable de classe Styles, elle doit d'abord être instanciée, par exemple
Dim stys as Styles
Set stys = ActiveDocument.Styles
For Each
Voici un exemple de traitement des éléments Styles dans une collection
Dim sty As Style
For Each sty In ActiveDocument.Range.Styles
Next sty
Add
Crée un nouveau style défini par l’utilisateur et l’ajoute à la collection styles .
Set myStyle = ActiveDocument.Styles.Add(Name:="Introduction", _
Type:=wdStyleTypeCharacter)
With myStyle.Font
.Bold = True
.Italic = True
.Name = "Arial"
.Size = 12
End With
Selection.Range.Style = "Introduction"
Arguments
Un argument nommé
Name (String) - Nom du nouveau style.
Optional arguments
Les arguments suivants sont facultatifs
Type (WdStyleType) - Il peut s’agir de l’une des constantes WdStyleType .
Valeurs possibles sont
wdStyleTypeCharacter | Style de caractères du corps de texte. |
wdStyleTypeLinked | |
wdStyleTypeList | Style Liste. |
wdStyleTypeParagraph | Style Paragraphe. |
wdStyleTypeParagraphOnly | |
wdStyleTypeTable | Style Tableau. |
Count
Renvoie un type long qui représente le nombre de styles dans la collection.
Dim lngCount As Long
lngCount = ActiveDocument.Styles.Count
Item
Renvoie un objet style spécifique appartenant à une collection.
Item (Index)
Index: Objet spécifique qui doit être renvoyé.
Dim sty As Style
Set sty = ActiveDocument.Styles(Index:=1)