bonsoir
j'ai besoin de votre aide pour la création d'une feuille graphique séparée a partir des données de deux colonnes d'une ListBox Multi-colonnes ( en VBA)
quelque chose pour remplacer "Worksheets(“sheet1”).Range(“A1”).CurrentRegion ...." dans le code ci-dessous par le contenu de la ListBox
merci d'avance
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6 Sub createmychart() Dim chart1 As Chart Set chart1 = Charts.Add chart1.SetSourceData Source:=Worksheets(sheet1).Range(A1).CurrentRegion, PlotBy:=xlColumns chart1.ChartType = xlColumnClustered End Sub
Partager