Pas facile la quête du Graal !
J'ai un graphique «nuage» avec deux flèches que
cette macro aligne sur les axes. Mais voilà, l'alignement
ne se fait pas toujours parfaitement.
Pourquoi ? (Voir commentaires dans macro).
Je peux vous poster mon document si vous désirez constater
de visu mon petit problème.
Sub AjusterFlèchesSurAxes()
Dim LY As Double, TX As Double
Set graphe = ActiveSheet.ChartObjects("GrapheGarno")
Set AxeX = graphe.Chart.Axes(xlCategory)
Set AxeY = graphe.Chart.Axes(xlValue)
Set fx = graphe.Chart.Shapes("flècheX")
Set fy = graphe.Chart.Shapes("flècheY")
LY = AxeY.Left
TX = AxeX.Top
fx.Left = graphe.Width - fx.Width - 10
' Le Top de fx n'est pas toujours égal à TX !!!
' Infime différence.
fx.Top = TX
' Le Left de fy n'est pas toujours égal à LY !!!
' Infime différence.
fy.Left = LY
fy.Top = 0
End Sub
quand on voit les flèches parfaitement alignées sur le graphique, elles ne le sont plus à l'impression !!!
;-(((
Serge
Pierre CFI
bonjour étonnes moi :o))) si pas trop gros, envoie ton fichier
-- Pierre CFI MVP Microsoft Access Mail : http://cerbermail.com/?z0SN8cN53B
Site pour bien commencer http://users.skynet.be/mpfa/ Site perso http://access.cfi.free.fr "garnote" a écrit dans le message de news: EFvmb.11874$
quand on voit les flèches parfaitement alignées sur le graphique, elles ne le sont plus à l'impression !!!
;-(((
Serge
bonjour
étonnes moi :o)))
si pas trop gros, envoie ton fichier
pierresalaun@aol.com
--
Pierre CFI
MVP Microsoft Access
Mail : http://cerbermail.com/?z0SN8cN53B
Site pour bien commencer
http://users.skynet.be/mpfa/
Site perso
http://access.cfi.free.fr
"garnote" <rien@absent.net> a écrit dans le message de news: EFvmb.11874$P42.687@charlie.risq.qc.ca...
quand on voit les flèches parfaitement alignées sur
le graphique, elles ne le sont plus à l'impression !!!
bonjour étonnes moi :o))) si pas trop gros, envoie ton fichier
-- Pierre CFI MVP Microsoft Access Mail : http://cerbermail.com/?z0SN8cN53B
Site pour bien commencer http://users.skynet.be/mpfa/ Site perso http://access.cfi.free.fr "garnote" a écrit dans le message de news: EFvmb.11874$
quand on voit les flèches parfaitement alignées sur le graphique, elles ne le sont plus à l'impression !!!
;-(((
Serge
STéphane
bonjour à tous
je suis intrigué que veux-tu faire exactement Serge ?
en attendant et dans le doute j'ai préparé un truc fy.Top = axey.Top + axey.Width fx.Left = (axex.Left + axex.Width)
bye stephane "Pierre CFI" a écrit dans le message de news:
bonjour étonnes moi :o))) si pas trop gros, envoie ton fichier
-- Pierre CFI MVP Microsoft Access Mail : http://cerbermail.com/?z0SN8cN53B
Site pour bien commencer http://users.skynet.be/mpfa/ Site perso http://access.cfi.free.fr "garnote" a écrit dans le message de news: EFvmb.11874$
quand on voit les flèches parfaitement alignées sur le graphique, elles ne le sont plus à l'impression !!!
;-(((
Serge
bonjour à tous
je suis intrigué que veux-tu faire exactement Serge ?
en attendant et dans le doute j'ai préparé un truc
fy.Top = axey.Top + axey.Width
fx.Left = (axex.Left + axex.Width)
bye
stephane
"Pierre CFI" <XXX_pierresalaun@aol.com> a écrit dans le message de news:
uhhPuTwmDHA.2808@TK2MSFTNGP10.phx.gbl...
bonjour
étonnes moi :o)))
si pas trop gros, envoie ton fichier
pierresalaun@aol.com
--
Pierre CFI
MVP Microsoft Access
Mail : http://cerbermail.com/?z0SN8cN53B
Site pour bien commencer
http://users.skynet.be/mpfa/
Site perso
http://access.cfi.free.fr
"garnote" <rien@absent.net> a écrit dans le message de news:
EFvmb.11874$P42.687@charlie.risq.qc.ca...
quand on voit les flèches parfaitement alignées sur
le graphique, elles ne le sont plus à l'impression !!!
je suis intrigué que veux-tu faire exactement Serge ?
en attendant et dans le doute j'ai préparé un truc fy.Top = axey.Top + axey.Width fx.Left = (axex.Left + axex.Width)
bye stephane "Pierre CFI" a écrit dans le message de news:
bonjour étonnes moi :o))) si pas trop gros, envoie ton fichier
-- Pierre CFI MVP Microsoft Access Mail : http://cerbermail.com/?z0SN8cN53B
Site pour bien commencer http://users.skynet.be/mpfa/ Site perso http://access.cfi.free.fr "garnote" a écrit dans le message de news: EFvmb.11874$
quand on voit les flèches parfaitement alignées sur le graphique, elles ne le sont plus à l'impression !!!
;-(((
Serge
garnote
Salut Stéphane,
Ce que je veux, c'est faire plaisir aux profs de mon département qui voudraient bien avoir des graphiques de fonctions mathématiques avec des axes fléchés.
Serge
"STéphane" a écrit dans le message de news: #
bonjour à tous
je suis intrigué que veux-tu faire exactement Serge ?
en attendant et dans le doute j'ai préparé un truc fy.Top = axey.Top + axey.Width fx.Left = (axex.Left + axex.Width)
bye stephane "Pierre CFI" a écrit dans le message de news:
bonjour étonnes moi :o))) si pas trop gros, envoie ton fichier
-- Pierre CFI MVP Microsoft Access Mail : http://cerbermail.com/?z0SN8cN53B
Site pour bien commencer http://users.skynet.be/mpfa/ Site perso http://access.cfi.free.fr "garnote" a écrit dans le message de news: EFvmb.11874$
quand on voit les flèches parfaitement alignées sur le graphique, elles ne le sont plus à l'impression !!!
;-(((
Serge
Salut Stéphane,
Ce que je veux, c'est faire plaisir aux profs de mon département
qui voudraient bien avoir des graphiques de fonctions
mathématiques avec des axes fléchés.
Serge
"STéphane" <royer_stephane@yahoo.fr> a écrit dans le message de news:
#OJ2ZtwmDHA.392@TK2MSFTNGP11.phx.gbl...
bonjour à tous
je suis intrigué que veux-tu faire exactement Serge ?
en attendant et dans le doute j'ai préparé un truc
fy.Top = axey.Top + axey.Width
fx.Left = (axex.Left + axex.Width)
bye
stephane
"Pierre CFI" <XXX_pierresalaun@aol.com> a écrit dans le message de news:
uhhPuTwmDHA.2808@TK2MSFTNGP10.phx.gbl...
bonjour
étonnes moi :o)))
si pas trop gros, envoie ton fichier
pierresalaun@aol.com
--
Pierre CFI
MVP Microsoft Access
Mail : http://cerbermail.com/?z0SN8cN53B
Site pour bien commencer
http://users.skynet.be/mpfa/
Site perso
http://access.cfi.free.fr
"garnote" <rien@absent.net> a écrit dans le message de news:
EFvmb.11874$P42.687@charlie.risq.qc.ca...
quand on voit les flèches parfaitement alignées sur
le graphique, elles ne le sont plus à l'impression !!!
Ce que je veux, c'est faire plaisir aux profs de mon département qui voudraient bien avoir des graphiques de fonctions mathématiques avec des axes fléchés.
Serge
"STéphane" a écrit dans le message de news: #
bonjour à tous
je suis intrigué que veux-tu faire exactement Serge ?
en attendant et dans le doute j'ai préparé un truc fy.Top = axey.Top + axey.Width fx.Left = (axex.Left + axex.Width)
bye stephane "Pierre CFI" a écrit dans le message de news:
bonjour étonnes moi :o))) si pas trop gros, envoie ton fichier
-- Pierre CFI MVP Microsoft Access Mail : http://cerbermail.com/?z0SN8cN53B
Site pour bien commencer http://users.skynet.be/mpfa/ Site perso http://access.cfi.free.fr "garnote" a écrit dans le message de news: EFvmb.11874$
quand on voit les flèches parfaitement alignées sur le graphique, elles ne le sont plus à l'impression !!!
;-(((
Serge
STéphane
le code que j'ai mis arrive à positionner les flèches au bout des axes
"garnote" a écrit dans le message de news: pHwmb.12200$
Salut Stéphane,
Ce que je veux, c'est faire plaisir aux profs de mon département qui voudraient bien avoir des graphiques de fonctions mathématiques avec des axes fléchés.
Serge
"STéphane" a écrit dans le message de news: #
bonjour à tous
je suis intrigué que veux-tu faire exactement Serge ?
en attendant et dans le doute j'ai préparé un truc fy.Top = axey.Top + axey.Width fx.Left = (axex.Left + axex.Width)
bye stephane "Pierre CFI" a écrit dans le message de news:
bonjour étonnes moi :o))) si pas trop gros, envoie ton fichier
-- Pierre CFI MVP Microsoft Access Mail : http://cerbermail.com/?z0SN8cN53B
Site pour bien commencer http://users.skynet.be/mpfa/ Site perso http://access.cfi.free.fr "garnote" a écrit dans le message de news: EFvmb.11874$
quand on voit les flèches parfaitement alignées sur le graphique, elles ne le sont plus à l'impression !!!
;-(((
Serge
le code que j'ai mis arrive à positionner les flèches au bout des axes
"garnote" <rien@absent.net> a écrit dans le message de news:
pHwmb.12200$P42.8821@charlie.risq.qc.ca...
Salut Stéphane,
Ce que je veux, c'est faire plaisir aux profs de mon département
qui voudraient bien avoir des graphiques de fonctions
mathématiques avec des axes fléchés.
Serge
"STéphane" <royer_stephane@yahoo.fr> a écrit dans le message de news:
#OJ2ZtwmDHA.392@TK2MSFTNGP11.phx.gbl...
bonjour à tous
je suis intrigué que veux-tu faire exactement Serge ?
en attendant et dans le doute j'ai préparé un truc
fy.Top = axey.Top + axey.Width
fx.Left = (axex.Left + axex.Width)
bye
stephane
"Pierre CFI" <XXX_pierresalaun@aol.com> a écrit dans le message de news:
uhhPuTwmDHA.2808@TK2MSFTNGP10.phx.gbl...
bonjour
étonnes moi :o)))
si pas trop gros, envoie ton fichier
pierresalaun@aol.com
--
Pierre CFI
MVP Microsoft Access
Mail : http://cerbermail.com/?z0SN8cN53B
Site pour bien commencer
http://users.skynet.be/mpfa/
Site perso
http://access.cfi.free.fr
"garnote" <rien@absent.net> a écrit dans le message de news:
EFvmb.11874$P42.687@charlie.risq.qc.ca...
quand on voit les flèches parfaitement alignées sur
le graphique, elles ne le sont plus à l'impression !!!
le code que j'ai mis arrive à positionner les flèches au bout des axes
"garnote" a écrit dans le message de news: pHwmb.12200$
Salut Stéphane,
Ce que je veux, c'est faire plaisir aux profs de mon département qui voudraient bien avoir des graphiques de fonctions mathématiques avec des axes fléchés.
Serge
"STéphane" a écrit dans le message de news: #
bonjour à tous
je suis intrigué que veux-tu faire exactement Serge ?
en attendant et dans le doute j'ai préparé un truc fy.Top = axey.Top + axey.Width fx.Left = (axex.Left + axex.Width)
bye stephane "Pierre CFI" a écrit dans le message de news:
bonjour étonnes moi :o))) si pas trop gros, envoie ton fichier
-- Pierre CFI MVP Microsoft Access Mail : http://cerbermail.com/?z0SN8cN53B
Site pour bien commencer http://users.skynet.be/mpfa/ Site perso http://access.cfi.free.fr "garnote" a écrit dans le message de news: EFvmb.11874$
quand on voit les flèches parfaitement alignées sur le graphique, elles ne le sont plus à l'impression !!!