Remarque
L’accès à cette page nécessite une autorisation. Vous pouvez essayer de vous connecter ou de modifier des répertoires.
L’accès à cette page nécessite une autorisation. Vous pouvez essayer de modifier des répertoires.
Renvoie une collection de Styles pour le document spécifié. En lecture seule.
Syntaxe
expression. Les styles
expression Variable qui représente un objet Document .
Remarques
Pour plus d’informations sur le retour d’un seul membre d’une collection, voir Retour d’un objet d’une collection.
Exemple
Cet exemple montre comment appliquer le style Heading 1 à chacun des paragraphes du document actif qui commence par le mot « Chapter ».
For Each para In ActiveDocument.Paragraphs
If para.Range.Words(1).Text = "Chapter " Then
para.Style = ActiveDocument.Styles(wdStyleHeading1)
End If
Next para
Cet exemple ouvre le modèle attaché au document actif et modifie le style Titre 1. Le modèle est enregistré et tous les styles du document actif sont mis à jour.
Set tempDoc = ActiveDocument.AttachedTemplate.OpenAsDocument
With tempDoc.Styles(wdStyleHeading1).Font
.Name = "Arial"
.Size = 16
End With
tempDoc.Close SaveChanges:=wdSaveChanges
ActiveDocument.UpdateStyles
Voir aussi
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.