copier un tableau excel dans word

Question

Bonjour,
J'essaie à partir de code VBA dans Excel de copier un tableau pour le coller en tant qu'image dans Word.
J'arrive à créer mon document Word mais ça coince au moment de la copie. Quelqu'un connait la manip ?
Merci

Mon code :

    Range("A1:D23").Select
    Selection.Copy
    Set WordApp = CreateObject("Word.Application")
    WordApp.Visible = True
    Set WordDoc = WordApp.Documents.Add
    
    WordApp.Selection.Paste    'le pb est ici
"erreur d'exécution '9', l'indice n'appartient pas à la sélection"
Malgré tout, mom image est collée mais lorsque je clique sur "déboggage" le code va automatiquement à la dernière ligne qui est :
    DocWord.Application.Quit

mortalino · Answer

Salut, essai ton code avec cette variante au niveau du collage : Range("A1:D23").Select Selection.Copy Set WordApp = CreateObject("Word.Application") WordApp.Visible = True Set WordDoc = WordApp.Documents.Add WordApp.Selection.PasteExcelTable False, False, False ' essaie comme ceci ~ Mortalino ~ Colorisation automatique @++

--Mortalino-- Le mystérieux chevalier, "Provençal, le Gaulois" /DIV>

cs_lili75 · Answer

Salut,
Ca marche bien, je n'ai + d'erreur. Ce n'est pas une image qui est collée mais je me débrouille avec ça. 
Merci !

Copier un tableau excel dans word

2 réponses

Votre réponse

Discussions similaires