Insertion tableau sur Word avec VB.net

Bonjour à tous !

Je tiens d'abord à m'excuser si je ne poste pas au bon endroit et s'il existe déjà un topic identique (j'ai pourtant tenté de chercher :?) mais je suis désespérée !!

Je requiers l'aide de tout ceux apte à régler mon souci ; je m'explique :

Je travaille actuellement sous visual studio en visual basic.
Dans le cadre de mon boulot, je dois afficher un tableau sur un document word.

Je dois placer ce tableau à un endroit précis du document word, et je dois pouvoir le modifier par la suite (supression de ligne et/ ou ajout de ligne)
Ce tableau peut prendre différentes tailles de base.

Je sais juste qu'il faut placer un signet à l'endroit de l'insertion sous Word mais après je ne sais pas du tout comment procéder dans le code.
J'arrive seulement à insérer du texte à la suite d'un signet

Donc si quelqu'un aurait un tutoriel ou je ne sais quoi qui puisse m'aider ce serait très appréciable !

voici mon code et ce que j'ai tenté :

Code:

---

1 2 3 4 5 6 7 8 9 10

Dim objWord As Word.Application Dim docWord As Word.Document   docWord.Activate() objWord.Visible() = True   Dim tableau As Word.Table tableau = objWord.ActiveDocument.Tables.Add(Range:=docWord.Bookmarks.Item("tableau_tnr"), NumRows:=5, NumColumns:=6)   objWord.ActiveDocument.Tables(1).Cell(1, 1).Range.Text = "Mon Texte"

---

Si je dois préciser des choses, n'hésitez pas à me le demander !!

Merci beaucoup d'avance :)

bonsoir,

As-tu parcouru ce tuto http://msdn.microsoft.com/fr-fr/libr...ice.11%29.aspx
tu ne dois pas avoir beaucoup d'adaptation à faire je pense.

bon code ...

Ah Merci infiniment !

J'ai réussi à insérer un tableau ! c'est un bon début :)

J'avais trouvé des tuto mais uniquement en VBA et même à force de tripoter je n'arrivait à rien.


Pour info, voici mon code :

Code:

---

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

Dim objWord As Word.Application Dim docWord As Word.Document   objWord = CreateObject("Word.Application") docWord = objWord.Documents.Open(CType(fichier, Object))   Dim tbl As Word.Table = docWord.Tables(1)   With docWord   tbl = docWord.Tables.Add(Range:=.Bookmarks.Item("tableau_tnr").Range, NumRows:=2, NumColumns:=2) tbl.Rows.Add() tbl.Cell(1, 1).Range.Text = "youpi" End With

---

voilà, après j'ai pas encore tout à fait réglé la où je voulais insérer mon texte mais le principal c'est d'avoir trouvé comment ça fonctionnait au niveau du code !!
J'espère que ça pourra en aider d'autre


Bonne journée, en espérant que je ne rencontre pas de nouveaux problèmes :cry: