Modifier un graphique par du code vb sous excel [Résolu]

benbill 21 Messages postés mercredi 18 mai 2005Date d'inscription 21 juin 2005 Dernière intervention - 21 juin 2005 à 15:55 - Dernière réponse : benbill 21 Messages postés mercredi 18 mai 2005Date d'inscription 21 juin 2005 Dernière intervention
- 21 juin 2005 à 17:54
Bonjour,
J'aimerai modifier l'axe des ordonnées d'un graphique par une valeur qui se trouve dans une case d'une feuille sous excel en utilisant vb.
Premere question : est ce possible ???
deuxieme question : Commenet peut on faire cela
derniere question : a l'aide, au secours, aider moi j'en peux plus !!!!!!!!!

MERCI
Afficher la suite 

2 réponses

mrdep1978 402 Messages postés jeudi 25 novembre 2004Date d'inscription 7 juin 2009 Dernière intervention - 21 juin 2005 à 17:38
+3
Utile
Si j'ai compris, tu veux modifier la valeur max de l'axe des ordonnées

Si c'est le cas :
Première réponse : Oui
Deuxième réponse :
Public Sub test()
' La version longue (mais qui permet d'avoir les propriétés en faisant Ctrl + Espace)
Dim l_ChartObject As ChartObject
Dim l_Axe As Axis
Set l_ChartObject = Worksheets("Feuil1").ChartObjects(1)
Set l_Axe = l_ChartObject.Chart.Axes(xlValue)
'La valeur max de l'ordonnée devient la valeur de la cellule B5
l_Axe.MaximumScale = Worksheets("Feuil1").Range("B5")
'La valeur min celle de B1
l_Axe.MinimumScale = Worksheets("Feuil1").Range("B1")
Set l_Axe = Nothing
Set l_ChartObject = Nothing

'La version courte
With Worksheets("Feuil1").ChartObjects(1).Chart.Axes(xlValue)
.MaximumScale = Worksheets("Feuil1").Range("B5")
.MinimumScale = Worksheets("Feuil1").Range("B1")
End With
End Sub

Troisième réponse : N'aies pas peur, tout va bien, nous sommes là
Cette réponse vous a-t-elle aidé ?  
benbill 21 Messages postés mercredi 18 mai 2005Date d'inscription 21 juin 2005 Dernière intervention - 21 juin 2005 à 17:54
0
Utile
mrdep1978 je t'adore coment tu me sauve la vie !!!!
Merci Merci Merci Merci Merci
Depuis 2-3 heures je suis decu j'en pouvez plus !!!!!!
Encore merci !!!

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.