Est-il possible de modifier les propriétés d'un graphique sous ACCESS par du
code VB.
Exemple : changer les valeurs de l'échelle de l'axe Y (min, max, etc ..)
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
gpRBx
"d.bostmambrun" a écrit dans le message de news: 4512a476$0$25912$
Bonjour Est-il possible de modifier les propriétés d'un graphique sous ACCESS par du code VB. Exemple : changer les valeurs de l'échelle de l'axe Y (min, max, etc ..) merci d'avance
On peut y arriver (péniblement) en ajoutant un bouton de commande cmdAjust et 2 contrôles Texte Ymin et YMax dans le formulaire qui contient GraphiqueV, en opérant pas des envois de touches. Le code suivant fonctionne chez moi en cliquant sur cmdAjust : DoCmd.GoToControl "GraphiqueV" GraphiqueV.Action = acOLEActivate SendKeys "{F10}AF", True 'ferme la feuille de données de MSGraph SendKeys "{F10}", True SendKeys "^{TAB}", True 'sélectionne la barre d'outils de MSGraph SendKeys "{DOWN}{DOWN}{DOWN}{ENTER}", True 'sélectionne l'axe des ordonnées SendKeys "{F10}te{RIGHT}", True 'sélectionne l'onglet Echelle SendKeys "{TAB}{TAB}", True 'positionne le minimum SendKeys Format$(Ymin, "##0.00"), True SendKeys "{TAB}{TAB}", True 'positionne le Maximum SendKeys Format$(YMax, "##0.00"), True SendKeys "{ENTER}", True J'aurais apprécié de savoir récupérer un Objet Chart contenu dans le contôle GraphiqueV comme on peut le faire dans Excel. A vous : gpRBx
"d.bostmambrun" <d.bostmambrun@wanadoo.fr> a écrit dans le message de news:
4512a476$0$25912$ba4acef3@news.orange.fr...
Bonjour
Est-il possible de modifier les propriétés d'un graphique sous ACCESS par
du code VB.
Exemple : changer les valeurs de l'échelle de l'axe Y (min, max, etc ..)
merci d'avance
On peut y arriver (péniblement) en ajoutant un bouton de commande
cmdAjust et 2 contrôles Texte Ymin et YMax dans le formulaire
qui contient GraphiqueV, en opérant pas des envois de touches.
Le code suivant fonctionne chez moi en cliquant sur cmdAjust :
DoCmd.GoToControl "GraphiqueV"
GraphiqueV.Action = acOLEActivate
SendKeys "{F10}AF", True 'ferme la feuille de données de MSGraph
SendKeys "{F10}", True
SendKeys "^{TAB}", True 'sélectionne la barre d'outils de MSGraph
SendKeys "{DOWN}{DOWN}{DOWN}{ENTER}", True 'sélectionne l'axe des
ordonnées
SendKeys "{F10}te{RIGHT}", True 'sélectionne l'onglet Echelle
SendKeys "{TAB}{TAB}", True 'positionne le minimum
SendKeys Format$(Ymin, "##0.00"), True
SendKeys "{TAB}{TAB}", True 'positionne le Maximum
SendKeys Format$(YMax, "##0.00"), True
SendKeys "{ENTER}", True
J'aurais apprécié de savoir récupérer un Objet Chart contenu dans le contôle
GraphiqueV
comme on peut le faire dans Excel.
A vous : gpRBx
"d.bostmambrun" a écrit dans le message de news: 4512a476$0$25912$
Bonjour Est-il possible de modifier les propriétés d'un graphique sous ACCESS par du code VB. Exemple : changer les valeurs de l'échelle de l'axe Y (min, max, etc ..) merci d'avance
On peut y arriver (péniblement) en ajoutant un bouton de commande cmdAjust et 2 contrôles Texte Ymin et YMax dans le formulaire qui contient GraphiqueV, en opérant pas des envois de touches. Le code suivant fonctionne chez moi en cliquant sur cmdAjust : DoCmd.GoToControl "GraphiqueV" GraphiqueV.Action = acOLEActivate SendKeys "{F10}AF", True 'ferme la feuille de données de MSGraph SendKeys "{F10}", True SendKeys "^{TAB}", True 'sélectionne la barre d'outils de MSGraph SendKeys "{DOWN}{DOWN}{DOWN}{ENTER}", True 'sélectionne l'axe des ordonnées SendKeys "{F10}te{RIGHT}", True 'sélectionne l'onglet Echelle SendKeys "{TAB}{TAB}", True 'positionne le minimum SendKeys Format$(Ymin, "##0.00"), True SendKeys "{TAB}{TAB}", True 'positionne le Maximum SendKeys Format$(YMax, "##0.00"), True SendKeys "{ENTER}", True J'aurais apprécié de savoir récupérer un Objet Chart contenu dans le contôle GraphiqueV comme on peut le faire dans Excel. A vous : gpRBx
