Créer un Tableau dans Excel

Bonjour,

je voudrais créer un Tableau dans Excel en vb mais j'arrive pas a trouver comment faire.

Je suppose que ça doit etre qq chose comme : ActiveSheet.Tables.add()
Mais visiblement il n'y a pas d'objet Tables dans ActiveSheet

Si qqun pouvait me venir en aide ça serait pas mal ! :)

merci

Bonjour

Pourrais-tu définir ce que tu entends par "tableau" dans Excel?

bonsoir


Il faut utiliser l'objet ListObjects et non Tables.
Tu trouveras plusieurs exemples dansla FAQ Excel :

http://excel.developpez.com/faq/?page=Tableau

Code:

---

1 2 3 4 5 6 7

Set Ws = Worksheets("Feuil1")   'Un exemple qui prend en compte les cellules voisines à A1 With Ws .ListObjects.Add(xlSrcRange, .Range("$A$1").CurrentRegion, , xlYes).Name = NomTable .ListObjects(NomTable).TableStyle = "TableStyleMedium5" End With

---

bonne soirée
michel