Partager via


Propriété Document.ActiveWritingStyle (Word)

Cette propriété renvoie ou définit le style d'écriture pour une langue spécifique dans le document spécifié. String en lecture/écriture.

Syntaxe

expression. ActiveWritingStyle( _LanguageID_ )

expression Obligatoire. Variable qui représente un objet Document.

Parameters

Nom Requis/Facultatif Type de données Description
LanguageID Obligatoire Variant La langue pour définir le style d'écriture pour le document spécifié. Peut être une chaîne ou une des constantes WdLanguageID suivantes. Certaines des constantes WdLanguageID ne soient pas disponibles, en fonction de la prise en charge de langue (anglais (États-Unis), par exemple) que vous avez sélectionnée ou installée.

Remarques

La propriété WritingStyleList renvoie un tableau des noms des styles d'écriture disponibles.

Exemple

Cet exemple montre comment définir le style d'écriture utilisé pour le français, l'allemand et l'anglais (États-Unis) dans le document actif. Pour exécuter cet exemple, vous devez installer au préalable les fichiers des dictionnaires de grammaire français, allemand et anglais (États-Unis).

With ActiveDocument 
 .ActiveWritingStyle(wdFrench) = "Commercial" 
 .ActiveWritingStyle(wdGerman) = "Technisch/Wiss" 
 .ActiveWritingStyle(wdEnglishUS) = "Technical" 
End With

Cet exemple montre comment renvoyer le style d'écriture correspondant à la langue utilisée dans la sélection.

Sub WhichLanguage() 
 Dim varLang As Variant 
 
 varLang = Selection.LanguageID 
 MsgBox ActiveDocument.ActiveWritingStyle(varLang) 
End Sub

Voir aussi

Objet Document

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.