Elle ne fonctionne pas, je ne comprends pas pourquoi. Merci de votre aide...
Arnaud
Mathilde
Bonjour, essaye ça
Sub Graph()
Dim Min, Max Min = Sheets("synthèse").Range("F5") Max = Sheets("synthèse").Range("F6") With ActiveChart.Axes(xlValue) .MinimumScale = Min .MaximumScale = Max End With End Sub
-----Message d'origine----- Bonjour,
Je voudrais choisir l'échelle d'un graph à partir de 2 valeurs situé dans 2 cases d'Excel ;
Elle ne fonctionne pas, je ne comprends pas pourquoi. Merci de votre aide...
Arnaud
.
Bonjour,
essaye ça
Sub Graph()
Dim Min, Max
Min = Sheets("synthèse").Range("F5")
Max = Sheets("synthèse").Range("F6")
With ActiveChart.Axes(xlValue)
.MinimumScale = Min
.MaximumScale = Max
End With
End Sub
-----Message d'origine-----
Bonjour,
Je voudrais choisir l'échelle d'un graph à partir de 2
valeurs situé dans 2 cases d'Excel ;
Dim Min, Max Min = Sheets("synthèse").Range("F5") Max = Sheets("synthèse").Range("F6") With ActiveChart.Axes(xlValue) .MinimumScale = Min .MaximumScale = Max End With End Sub
-----Message d'origine----- Bonjour,
Je voudrais choisir l'échelle d'un graph à partir de 2 valeurs situé dans 2 cases d'Excel ;