VBA Excel graphique

sarah3854 -  
 sarah3854 -
Bonjour,


j'ai une petite question simple mais à laquelle je n'arrive pas à répondre:
je voudrais faire un mixe des 2 codes suivants me permettant de dire que l'abscisse de mon graphe est situé dans la feuille Pentes jusqu'à la ligne i - 1

ActiveChart.SeriesCollection(1).XValues = "=Pentes!R10C8:R33C8"
ActiveChart.SeriesCollection(1).XValues = Range("P10:P" & i - 1 & "")

J'ai essayé

ActiveChart.SeriesCollection(1).XValues = "=Pentes!R10C8:R" & i - 1 & "C8"

mais ca ne marche pas

merci d'avance

4 réponses

Réponse 1 / 4
cousinhub29 Messages postés 1074 Date d'inscription   Statut Membre Dernière intervention   361
 
Bonjour,

Tu as bien déterminé la valeur de i ?

Montre le code, pour voir
0
Réponse 2 / 4
sarah3854
 
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é
0
Réponse 3 / 4
cousinhub29 Messages postés 1074 Date d'inscription   Statut Membre Dernière intervention   361
 
Re-,

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?
0
Réponse 4 / 4
sarah3854
 
ca ne marche pas non plus avec ca...
0