[VBA] word automation copy/paste

Bonjour,

En vba depuis excel, j'essaye de copier une range avec un pasteSpecial dans word.
Est ce que vous savez je peux faire?
Merci d'avance

bonjour

j'espere que cet exemple pourra t'aider

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13

Sub CollerDansWordFormatBitmap() 'necessite d'activer la reference microsoft Word xx.x Object Library Dim Wrd As Word.Application   Range("A1:D10").Copy   Set Wrd = CreateObject("Word.Application") Wrd.Documents.Add Wrd.Visible = True   Wrd.Selection.PasteSpecial DataType:=wdPasteBitmap Application.CutCopyMode = False End Sub

---

cordialement
michel

Merci :)