Propriété StyleSheet.Title (Word)

  • Article

Cette propriété renvoie ou définit une chaîne qui représente le titre d'une feuille de style Web. Lecture-écriture.

Syntaxe

expression. Titre

expression Obligatoire. Variable qui représente un objet « StyleSheet ».

Exemple

Cet exemple montre comment affecter des titres aux trois premières feuilles de style Web attachées au document actif. Il présuppose que trois feuilles de style sont attachées au document actif.

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

Cet exemple montre comment créer une liste des feuilles de style Web attachées au document actif et placer la liste dans un nouveau document. Il est supposé qu'une ou plusieurs feuilles de style Web sont attachées au document actif.

Sub CSSTitles() 
 Dim docNew As Document 
 Dim styCSS As StyleSheet 
 
 Set docNew = Documents.Add 
 
 With docNew.Range(Start:=0, End:=0) 
 .InsertAfter "CSS Name : Assigned to " & ActiveDocument.Name _ 
 & vbTab & "Title" 
 .InsertParagraphAfter 
 For Each styCSS In ActiveDocument.StyleSheets 
 .InsertAfter styCSS.Name & vbTab & styCSS.Title 
 .InsertParagraphAfter 
 Next styCSS 
 .ConvertToTable 
 End With 
End Sub

Voir aussi

Objet de feuille de style

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.