bonjour'

je dois créer plusieurs graphique avec une macro (je ne sais pas combien j'aurais de ligne, ni de colonne)

j'ai réussi a boucler pour creér des graphique pour chaque ligne mais comment faire pour créer un graphique avec la premiere ligne et la deuxieme (definir aussi les absisses), puis la premiere et la troisième (garder les meme absisses changer les ordonnées) la 1 et la 4 .. etc.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
Range("E2:EE2,E4:EE4").Select
 ActiveSheet.Shapes.AddChart.Select
    ActiveChart.ChartType = xlXYScatterSmooth
cela me permet de grapher 2 lignes

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
Sheets(3).Activate
Range("E2", Range("E2").End(xlToRight)).Select
 
While Range("E2", Range("E2").End(xlToRight)).Columns("A:A").Offset(i, 0).Value <> ""
 
    ActiveSheet.Shapes.AddChart.Select
    ActiveChart.ChartType = xlXYScatterSmooth
  i = i + 1
    Range("E2", Range("E2").End(xlToRight)).Offset(i, 0).Select
 
    Wend
et ce code me permet de grapher toutes mes lignes mais je n'ai pas d'absisses pouvez vous m'aider ?