COPIER PLAGE EXCEL VERS WORD

[Archimed]

Hello !

Je cherche a copier coller une plage de cellules par code vba vers word.

Cette plage par exemple <( a1-B15)

EN manuel c est simple :

mais en vba???

Merci d´avance pour vos précieux conseils

Archimed <Cyber_Maths@hotmail.com>

 

[MichelXld]

bonjour Archimed

tu peux tester

Sub collerDonneesExcelDansWord()
Dim AppWord As Word.Application
Dim DocWord As Word.Document

ThisWorkbook.Worksheets('Feuil1').Range('A1:B15').Copy

Set AppWord = New Word.Application
AppWord.Visible = True

Set DocWord = AppWord.Documents.Open('C:\\monDocument.doc')
DocWord.Range.PasteSpecial
'DocWord.Close True
'AppWord.Quit

End Sub

bonne soiree
MichelXld