A voir également:
- VBA Excel graphique
- Liste déroulante excel - Guide
- Graphique excel - Guide
- Si et excel - Guide
- Changer carte graphique - Guide
- Graphique camembert excel - Guide
4 réponses
cousinhub29
Messages postés
955
Date d'inscription
mardi 10 août 2010
Statut
Membre
Dernière intervention
15 novembre 2024
344
15 nov. 2010 à 15:19
15 nov. 2010 à 15:19
Bonjour,
Tu as bien déterminé la valeur de i ?
Montre le code, pour voir
Tu as bien déterminé la valeur de i ?
Montre le code, pour voir
voilà le code:
Range("H10").Select
i = 10
While Not Range("H" & i & "").Value = 0
i = i + 1
Wend
Sheets("InstManhours").Select
ActiveSheet.ChartObjects("Chart 1").Activate
ActiveChart.SeriesCollection(1).XValues = "=Pentes!R10C8:R" & i - 1 & "C8"
i est bien défini et correctement calculé
Range("H10").Select
i = 10
While Not Range("H" & i & "").Value = 0
i = i + 1
Wend
Sheets("InstManhours").Select
ActiveSheet.ChartObjects("Chart 1").Activate
ActiveChart.SeriesCollection(1).XValues = "=Pentes!R10C8:R" & i - 1 & "C8"
i est bien défini et correctement calculé
cousinhub29
Messages postés
955
Date d'inscription
mardi 10 août 2010
Statut
Membre
Dernière intervention
15 novembre 2024
344
15 nov. 2010 à 16:02
15 nov. 2010 à 16:02
Re-,
Essaie avec ce code (sans utilisation du i)
Peut-être?
Essaie avec ce code (sans utilisation du i)
ActiveChart.SeriesCollection(1).XValues = Sheets("Pentes").Range("H10:H" & Sheets("Pentes").[H65000].End(xlUp).Row)
Peut-être?