continuer une macro sur word

salut tof

exemple de macro à mètre dans un module

Sub CopieDansWord()
Dim Wrd As Object

Range('A1:B10').Copy 'la plage à copier
On Error Resume Next
Set Wrd = GetObject(Class:='Word.Application')
On Error GoTo 0
If Wrd Is Nothing Then
Set Wrd = CreateObject('Word.Application')
Wrd.Visible = True
End If
Wrd.Documents.Open Filename:='C:\\test.doc' 'ou autre
SendKeys '^{END}'
Wrd.Selection.Paste
Wrd.Selection.TypeParagraph
Wrd.ActiveDocument.Save
Wrd.Quit
Application.CutCopyMode = False

End Sub


cette commande te copie la plage A1:B10 sur le classeur word 'test.doc se trouvant dans C:

faire essai et modifier

A+

Ok, c ce que je veux mais en plus je voudrais qu'il se positionne à un endroit précis, qu'est-ce que je dois rajouter ?

Merci d'avance , à++

par exemple à la ligne 20

Et pis je voudrais que ma page word reste ouverte

J'en demande pi etre trop :unsure:

En tout cas merci car ce que tu m'as donnée m'a grandement aidé !!