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
Tatanka
Salut Thom,
Ce que je veux, c'est faire dessiner le coin inférieur droit de mon rectangle exactement à l'origine de mon graph(0,0)
Avec un graphique en nuage de points, cette macro semble répondre à la question.
Sub Ajoute_Rectangle_Dans_Graphique() With ActiveChart L = .Axes(xlValue).Left T = .Axes(xlCategory).Top WR = 20 HR = 30 .Shapes.AddShape msoShapeRectangle, L - WR, T - HR, WR, HR End With End Sub
Serge
"Thom" a écrit dans le message de news: %
Bonjour à tous,
Je cherche à ajouter des rectangle dans un graphique Excel ave la méthode :
Le problème que le rectangle est dessiné à partir de l'origine de l'objet graph c'est à dire à l'angle supérieur gauche de mon graph
Ce que je veux, c'est faire dessiner le coin inférieur droit de mon rectangle exactement à l'origine de mon graph(0,0)
Cerise sur le gâteau, j'aimerai ensuite pouvoir agrandir dynamiquement le rectangle en respectant l'échelle du graph.
Merci pour vos réponse,
Thomas
Salut Thom,
Ce que je veux, c'est faire dessiner le coin inférieur droit de mon rectangle exactement à l'origine de mon graph(0,0)
Avec un graphique en nuage de points, cette macro
semble répondre à la question.
Sub Ajoute_Rectangle_Dans_Graphique()
With ActiveChart
L = .Axes(xlValue).Left
T = .Axes(xlCategory).Top
WR = 20
HR = 30
.Shapes.AddShape msoShapeRectangle, L - WR, T - HR, WR, HR
End With
End Sub
Serge
"Thom" <persone@microsoft.com> a écrit dans le message de news: %23CGt0otFIHA.3940@TK2MSFTNGP05.phx.gbl...
Bonjour à tous,
Je cherche à ajouter des rectangle dans un graphique Excel ave la méthode :
Ce que je veux, c'est faire dessiner le coin inférieur droit de mon rectangle exactement à l'origine de mon graph(0,0)
Avec un graphique en nuage de points, cette macro semble répondre à la question.
Sub Ajoute_Rectangle_Dans_Graphique() With ActiveChart L = .Axes(xlValue).Left T = .Axes(xlCategory).Top WR = 20 HR = 30 .Shapes.AddShape msoShapeRectangle, L - WR, T - HR, WR, HR End With End Sub
Serge
"Thom" a écrit dans le message de news: %
Bonjour à tous,
Je cherche à ajouter des rectangle dans un graphique Excel ave la méthode :
Le problème que le rectangle est dessiné à partir de l'origine de l'objet graph c'est à dire à l'angle supérieur gauche de mon graph
Ce que je veux, c'est faire dessiner le coin inférieur droit de mon rectangle exactement à l'origine de mon graph(0,0)
Cerise sur le gâteau, j'aimerai ensuite pouvoir agrandir dynamiquement le rectangle en respectant l'échelle du graph.
Merci pour vos réponse,
Thomas
Thom
Oui, ça marche bien!!
Seul petit souci, c'est que je n'arrive pas à récupérer l'échelle de mes axes pour pouvoir caller l'incrémentation de la taille du rectangle dessus
"Tatanka" a écrit dans le message de news:
Salut Thom,
Ce que je veux, c'est faire dessiner le coin inférieur droit de mon rectangle exactement à l'origine de mon graph(0,0)
Avec un graphique en nuage de points, cette macro semble répondre à la question.
Sub Ajoute_Rectangle_Dans_Graphique() With ActiveChart L = .Axes(xlValue).Left T = .Axes(xlCategory).Top WR = 20 HR = 30 .Shapes.AddShape msoShapeRectangle, L - WR, T - HR, WR, HR End With End Sub
Serge
"Thom" a écrit dans le message de news: %
Bonjour à tous,
Je cherche à ajouter des rectangle dans un graphique Excel ave la méthode :
Le problème que le rectangle est dessiné à partir de l'origine de l'objet graph c'est à dire à l'angle supérieur gauche de mon graph
Ce que je veux, c'est faire dessiner le coin inférieur droit de mon rectangle exactement à l'origine de mon graph(0,0)
Cerise sur le gâteau, j'aimerai ensuite pouvoir agrandir dynamiquement le rectangle en respectant l'échelle du graph.
Merci pour vos réponse,
Thomas
Oui, ça marche bien!!
Seul petit souci, c'est que je n'arrive pas à récupérer l'échelle de mes
axes pour pouvoir caller l'incrémentation de la taille du rectangle dessus
"Tatanka" <garnote3@ENLEVER.videotron.ca> a écrit dans le message de news:
OY2M0OwFIHA.3768@TK2MSFTNGP06.phx.gbl...
Salut Thom,
Ce que je veux, c'est faire dessiner le coin inférieur droit de mon
rectangle exactement à l'origine de mon graph(0,0)
Avec un graphique en nuage de points, cette macro
semble répondre à la question.
Sub Ajoute_Rectangle_Dans_Graphique()
With ActiveChart
L = .Axes(xlValue).Left
T = .Axes(xlCategory).Top
WR = 20
HR = 30
.Shapes.AddShape msoShapeRectangle, L - WR, T - HR, WR, HR
End With
End Sub
Serge
"Thom" <persone@microsoft.com> a écrit dans le message de news:
%23CGt0otFIHA.3940@TK2MSFTNGP05.phx.gbl...
Bonjour à tous,
Je cherche à ajouter des rectangle dans un graphique Excel ave la méthode
:
Seul petit souci, c'est que je n'arrive pas à récupérer l'échelle de mes axes pour pouvoir caller l'incrémentation de la taille du rectangle dessus
"Tatanka" a écrit dans le message de news:
Salut Thom,
Ce que je veux, c'est faire dessiner le coin inférieur droit de mon rectangle exactement à l'origine de mon graph(0,0)
Avec un graphique en nuage de points, cette macro semble répondre à la question.
Sub Ajoute_Rectangle_Dans_Graphique() With ActiveChart L = .Axes(xlValue).Left T = .Axes(xlCategory).Top WR = 20 HR = 30 .Shapes.AddShape msoShapeRectangle, L - WR, T - HR, WR, HR End With End Sub
Serge
"Thom" a écrit dans le message de news: %
Bonjour à tous,
Je cherche à ajouter des rectangle dans un graphique Excel ave la méthode :