Modules: Ouvrir un nouveau document Word basé sur un modèle, avec Automation |
Author(s) Dev Ashish |
|
Ouvrir un nouveau document Word basé sur un modèle, avec Automation.
Pour ouvrir un document Word basé sur un modèle
existant, vous devez spécifier le nom du modèle (template) comme argument à
la méthode Add de la collection Documents.
Si le modèle (.DOT) est sauvegardé dans le
répertoire UserTemplates, on peut utiliser la constante
prédéfinie wdUserTemplatesPath. Autrement, il faut fournir le
nom complet du fichier modèle.
'****** Code Start ********
Private mobjWordApp As Word.Application
Private Sub Command1_Click()
Const conTEMPLATE_NAME = "\Templates\merge.dot"
Set mobjWordApp = New Word.Application
With mobjWordApp
.Visible = True
.WindowState = wdWindowStateMaximize
.Documents.Add Template:=(.Options.DefaultFilePath( _
wdUserTemplatesPath) _
& conTEMPLATE_NAME)
End With
End Sub
'****** Code End ********
|