Ordonnées d'un graphe

L

Laura

Guest
Bonjour et bonne années à toutes et tous :kiss:

Comment forcer l affichage dans un graphique d'un axe des ordonnées compris entre un minimum et un maximum? ces deus valeurs sont calculées à coté du tableau servant au graphe. (sans passé par l'option axe des ordonnées et changer manuellement les valeurs!!!, car à chaque changement du tableau il me faut changer mes mes minis maxis) :S

J'espère cela possible......

D'avance un grand merci à votre contribution
 

Creepy

XLDnaute Accro
Hello le Forum, Laura,

Avec ce petit bout de code ca devrait faire l'affaire.

A mettre dans ta feuille graphique et adapter selon tes cellules à toi of course :

Code:
Private Sub Chart_SeriesChange(ByVal SeriesIndex As Long, ByVal PointIndex As Long)
ActiveChart.Axes(xlValue).Select
 With ActiveChart.Axes(xlValue)
    .CrossesAt = 0
    .MinimumScaleIsAuto = True
    .MaximumScaleIsAuto = True
    .MinimumScale = Sheets(KelFeuille1).Range('B73').Value - 2
    .MaximumScale = Sheets(KelFeuille1).Range('B72').Value + 2
  End With
ActiveChart.Axes(xlCategory).Select
    With ActiveChart.Axes(xlCategory)
      .CrossesAt = 0
      .MinimumScaleIsAuto = True
      .MaximumScaleIsAuto = True
      .MinimumScale = Sheets(KelFeuille1).Range('B71').Value - 2
      .MaximumScale = Sheets(KelFeuille1).Range('B70').Value + 2
End With

End Sub

@+

Creepy
 

Discussions similaires

Réponses
7
Affichages
322
Réponses
0
Affichages
266

Statistiques des forums

Discussions
312 677
Messages
2 090 811
Membres
104 671
dernier inscrit
Guilbry