Modifier une lettre Word d'un userform depuis Excel

Bonjour à tous,

J'aimerais savoir si c'est possible de modifier un document Word depuis Excel à l'aide d'un userform. Par exemple j'aimerai depuis excel une macro qui ouvre une lettre Word et qui modifie certaines informations.

A l'aide d'un UserForm, j'aimerai remplir un tableau excel avec le nom du client, l'adresse, le lieu, la référence... et ensuite avec une macro je souhaite ouvrir le modèle Word et remplacer les données clients avec les nouvelle qui se trouve dans Excel.

Je sais pas si c'est très clair mais d'avance je vous remercie.

Bonjour,

Il te faudrait créer des signets avec des noms assez parlants dans ton document Word et ensuite voici un code dont tu pourrait t'inspirer :

Sub ExcelVersWord()

    Dim Cel As Range
    Dim AppWord As Word.Application
    Dim Doc As Word.Document
    Dim Texte As Word.Range

    Set Cel = Worksheets("Feuil1").Range("A1")

    'crée une instance de Word
    Set AppWord = CreateObject("Word.Application")

    With AppWord

        .Visible = True

        'ouvre un document, adapter le chemin et nom !
        Set Doc = .Documents.Open("D:\Test.doc")

        With Doc

            'faire le choix :
            'remplace les signets par les textes des cellules A1 et B1
            .Bookmarks("Monsignet").Range.Text = Range("A1")
            .Bookmarks("Monsignet2").Range.Text = Range("B1")

            'insère le texte après les signets
            .Bookmarks("Monsignet").Range.InsertAfter Range("A1")
            .Bookmarks("Monsignet2").Range.InsertAfter Range("B1")

        End With

    End With

End Sub