Discussion :

[aiglevb]

Bonjour,

Ne trouvant rien sur internet, je cherche le code vba de :

Mettre sous forme de tableau -> Style de tableau clair 1

J'ai besoin de ce code vba pour le mettre dans un programme vb10.

Merci de votre attention à mon petit problème.

[lelensois16]

Fait avec l'enregistreur de macro :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
    ActiveSheet.ListObjects.Add(xlSrcRange, Range("$H$37:$I$38"), , xlNo).Name = _
        "Tableau1"
    Range("Tableau1[#All]").Select
    ActiveSheet.ListObjects("Tableau1").TableStyle = "TableStyleLight1"

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

("$H$37:$I$38")

étant les références du tableau

[aiglevb]

merci