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

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
merci d'avance