Création de tableau WORD

Question

Bonjour,

j'essaye d'insérer un tableau dans un objet word mais j'ai toujous un message d'erreur. voici mon code:

Dim Myapp As Word.Application
Dim myTable As Word.Table

Set Myapp = CreateObject("Word.Application")
Myapp.DisplayAlerts = False
Myapp.Documents.Add

Set myTable = Myapp.Documents.Item(1).Tables.Add(Range:=Selection.Range, NumRows:=2, NumColumns:=4)

la dernière instruction provoque l'erreur suivante:
variable objet ou variable bloc With non définie.

Merci pour votre aide

cmusy · Answer

Bonjour,

Essaie

Myapp.ActiveDocument.Tables.Add Range:=Selection.Range, NumRows:=2, NumColumns:=4

cmusy

keopsk · Answer

Merci beaucoup 
ça marche

cs_redwan · Answer

Salut la foule,

Je cherche &#224; cr&#233;er un tableau Word &#224; partir d'Excel et je n'y arrive pas.

Voici mon code :
ApplicationWord.ActiveDocument.Tables.Add Range:=Selection.Range, NumRows:=2, NumColumns:=4

J'ai m&#234;me essay&#233; avec un objet Table mais rien n'y fait --> Ca marche pas ;-(

Merci d'avance pour votre pr&#233;cieuse aide.

Redwan - Un d&#233;veloppeur qu'aime bien d&#233;velopper sauf quand &#231;a bug !

Création de tableau WORD

3 réponses

Discussions similaires