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

  1.
    cousinhub29 Messages postés 1114 Date d'inscription   Statut Membre Dernière intervention   380
     
    Bonjour,

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

    Montre le code, pour voir
    0
  2. 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
  3. cousinhub29 Messages postés 1114 Date d'inscription   Statut Membre Dernière intervention   380
     
    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
  4. sarah3854
     
    ca ne marche pas non plus avec ca...
    0