Bonjour à tous
Je vous expose un petit problème en VBA
Je pars d'un document XLS à partir duquel je transfère des données dans un document WORD que je crée à partir d'EXCEL
Dim wdApp As New Word.Application
Dim wdDoc As Word.Document
MaChaineVB = "\Courrier activités collectives de " & Mois_des_activités & " - groupe " & UserForm1.TextG1.Text & ".docx"
wdApp.Visible = True
Set wdDoc = wdApp.Documents.Open(chemin & "\Activité Collective.docm")
wdDoc.Bookmarks("ai2").Range.Text = Feuil44.Cells(3, 5)
wdDoc.Bookmarks("ai3").Range.Text = Feuil44.Cells(3, 6)
wdDoc.Bookmarks("ai4").Range.Text = Feuil44.Cells(3, 7)
wdDoc.Bookmarks("ai5").Range.Text = Feuil44.Cells(3, 8)
Une fois dans le document word, j'aimerai assimiler ces valeurs à une variable chaine.
Comment reprendre la valeur par exemple du bookmarks("ai2") et l'associer à la variable 'chaine'. ?
Un grand merci pour votre aide
Je vous expose un petit problème en VBA
Je pars d'un document XLS à partir duquel je transfère des données dans un document WORD que je crée à partir d'EXCEL
Dim wdApp As New Word.Application
Dim wdDoc As Word.Document
MaChaineVB = "\Courrier activités collectives de " & Mois_des_activités & " - groupe " & UserForm1.TextG1.Text & ".docx"
wdApp.Visible = True
Set wdDoc = wdApp.Documents.Open(chemin & "\Activité Collective.docm")
wdDoc.Bookmarks("ai2").Range.Text = Feuil44.Cells(3, 5)
wdDoc.Bookmarks("ai3").Range.Text = Feuil44.Cells(3, 6)
wdDoc.Bookmarks("ai4").Range.Text = Feuil44.Cells(3, 7)
wdDoc.Bookmarks("ai5").Range.Text = Feuil44.Cells(3, 8)
Une fois dans le document word, j'aimerai assimiler ces valeurs à une variable chaine.
Comment reprendre la valeur par exemple du bookmarks("ai2") et l'associer à la variable 'chaine'. ?
Un grand merci pour votre aide