Christophe8676
XLDnaute Nouveau
Bonjour,
Je souhaite transferer un tableau Excel (onglet FICHE OOEI dans le fichier joint)vers un document word, pour cela j'utilise le code VBA suivant trouvé en parcourant le forum:
Sub InsereFicheWord()
Dim Wrd As Object
Set Wrd = CreateObject("Word.Application")
Dim AppWrd As Object
Set AppWrd = Wrd.Documents.Add
Wrd.Visible = True
Application.ScreenUpdating = False
Sheets("FICHE OEEI").Range("A1:U60").Copy
Wrd.selection.Paste
Application.ScreenUpdating = True
Application.CutCopyMode = False
End Sub
Mon souci c'est que le tableau se copie sur plusieurs page dans word. Lorsque je fais apperçu sous excel le tableau apparait sur une seul page.
Merci d'avance pour votre aide.
Je souhaite transferer un tableau Excel (onglet FICHE OOEI dans le fichier joint)vers un document word, pour cela j'utilise le code VBA suivant trouvé en parcourant le forum:
Sub InsereFicheWord()
Dim Wrd As Object
Set Wrd = CreateObject("Word.Application")
Dim AppWrd As Object
Set AppWrd = Wrd.Documents.Add
Wrd.Visible = True
Application.ScreenUpdating = False
Sheets("FICHE OEEI").Range("A1:U60").Copy
Wrd.selection.Paste
Application.ScreenUpdating = True
Application.CutCopyMode = False
End Sub
Mon souci c'est que le tableau se copie sur plusieurs page dans word. Lorsque je fais apperçu sous excel le tableau apparait sur une seul page.
Merci d'avance pour votre aide.