Propriété Application.Templates (Word)

  • Article

Renvoie une collection Templates qui représente tous les modèles disponibles — modèles globaux et ceux attachés aux documents ouverts.

Syntaxe

expression. Templates

Expression Expression qui renvoie un objet Application .

Remarques

Pour plus d’informations sur le renvoi d’un seul membre d’une collection, consultez Renvoi d’un objet à partir d’une collection.

Exemple

Cet exemple montre comment afficher le nom de chaque modèle de la collection Templates.

Count = 1 
For Each aTemplate In Templates 
 MsgBox aTemplate.Name & " is template number " & Count 
 Count = Count + 1 
Next aTemplate

Dans cet exemple, si le modèle 1 est un modèle global, son chemin d’accès est stocké dans thePath. L'instruction ChDir est utilisée pour faire du dossier dont le chemin d'accès stocké dans thePath du dossier actif. Lorsque cette modification est effective, la boîte de dialogue Ouvrir s'affiche.

If Templates(1).Type = wdGlobalTemplate Then 
 thePath = Templates(1).Path 
 If thePath <> "" Then ChDir thePath 
 Dialogs(wdDialogFileOpen).Show 
End If

Voir aussi

Objet Application

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.