Discussion :

[possible924]

Bonjour à tous,
Je souhaite, avec VBA ouvrir un document Word issu d'un modèle,
atteindre un signet, et y coller un texte contenu dans une variable type Variant.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
Dim TexteAdresse As Variant
    TexteAdresse = DestinataireCourrier & vbCrLf & AdresseCourrier
 
Dim appWD As Object
    Set appWD = CreateObject("Word.Application")
    With appWD
        .Visible = True
        .Documents.Add Template:="Z:\Alliance\Modèles\LettreBureauDesMariages.dot", NewTemplate:=False, DocumentType:=0
        .Activate
        .activedocument.Bookmarks("Adresse").Select
        TexteAdresse.Paste
    End With
 
End Sub

Tout va bien jusqu'à la ligne 11. Je ne sais pas comment coller le contenu de ma variable TexteAdresse
Merci par avance pour votre aide
Pierre

[tee_grandbois]

Bonsoir,
J'ai trouvé cette méthode

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

ActiveDocument.Bookmarks("Adresse").Range.Text = TexteAdresse

Dans le forum ici

[possible924]

Merci, ça marche très bien
Pierre