je voudrais affecter =E0 plusieurs grapiques un taille=20
identique. Pour ce faire, la solution que j'envisage est=20
de faire une macro qui r=E8gle la taille du graphique=20
s=E9lectionn=E9 =E0 la taille voulue (par exemple 10cm * 10 cm).
J'ai essay=E9 d'utiliser Selection.ShapeRange.Height =3D=20
HauteurD=E9sir=E9e, mais =E7a ne marche pas, la m=E9thode n'=E9tant=20
pas g=E9r=E9 par cet objet.
Quelqu'un peut-il me dire comment faire ?
Si qq a une autre solution, je suis =E9galement preneur.
merci d'avance, a+
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
Philippe.R
Bonjour, Ceci, à adapter, pourrait convenir
Sub taille() ActiveSheet.Shapes("Graphique 1").Width = 456 ActiveSheet.Shapes("Graphique 1").Height = 456 End Sub
-- Amicales Salutations Retirer A_S_ pour répondre. XL 97 / 2000 / 2002 Pour suivre le forum : news://msnews.microsoft.com/microsoft.public.fr.excel (Voulez-vous vous abonner ? -> Oui)
"pirabru" a écrit dans le message de news:1c4cf01c42202$ec0b50a0$ Bonjour,
je voudrais affecter à plusieurs grapiques un taille identique. Pour ce faire, la solution que j'envisage est de faire une macro qui règle la taille du graphique sélectionné à la taille voulue (par exemple 10cm * 10 cm). J'ai essayé d'utiliser Selection.ShapeRange.Height HauteurDésirée, mais ça ne marche pas, la méthode n'étant pas géré par cet objet. Quelqu'un peut-il me dire comment faire ? Si qq a une autre solution, je suis également preneur. merci d'avance, a+
Bonjour,
Ceci, à adapter, pourrait convenir
Sub taille()
ActiveSheet.Shapes("Graphique 1").Width = 456
ActiveSheet.Shapes("Graphique 1").Height = 456
End Sub
--
Amicales Salutations
Retirer A_S_ pour répondre.
XL 97 / 2000 / 2002
Pour suivre le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)
"pirabru" <anonymous@discussions.microsoft.com> a écrit dans le message de
news:1c4cf01c42202$ec0b50a0$a301280a@phx.gbl...
Bonjour,
je voudrais affecter à plusieurs grapiques un taille
identique. Pour ce faire, la solution que j'envisage est
de faire une macro qui règle la taille du graphique
sélectionné à la taille voulue (par exemple 10cm * 10 cm).
J'ai essayé d'utiliser Selection.ShapeRange.Height HauteurDésirée, mais ça ne marche pas, la méthode n'étant
pas géré par cet objet.
Quelqu'un peut-il me dire comment faire ?
Si qq a une autre solution, je suis également preneur.
merci d'avance, a+
Sub taille() ActiveSheet.Shapes("Graphique 1").Width = 456 ActiveSheet.Shapes("Graphique 1").Height = 456 End Sub
-- Amicales Salutations Retirer A_S_ pour répondre. XL 97 / 2000 / 2002 Pour suivre le forum : news://msnews.microsoft.com/microsoft.public.fr.excel (Voulez-vous vous abonner ? -> Oui)
"pirabru" a écrit dans le message de news:1c4cf01c42202$ec0b50a0$ Bonjour,
je voudrais affecter à plusieurs grapiques un taille identique. Pour ce faire, la solution que j'envisage est de faire une macro qui règle la taille du graphique sélectionné à la taille voulue (par exemple 10cm * 10 cm). J'ai essayé d'utiliser Selection.ShapeRange.Height HauteurDésirée, mais ça ne marche pas, la méthode n'étant pas géré par cet objet. Quelqu'un peut-il me dire comment faire ? Si qq a une autre solution, je suis également preneur. merci d'avance, a+
pirabru
merci, ça fonctionne en effet de manière là, mais je ne trouve pas le moyen d'affecter cette taille au graphique sélectionné. Il me faudrait quelque chose comme ActiveShape, l'équivalent de ActiveSheet ou ActiveCell, mais ce contrôle n'existe pas. Qq a-t-il une idée?
a+
-----Message d'origine----- Bonjour, Ceci, à adapter, pourrait convenir
Sub taille() ActiveSheet.Shapes("Graphique 1").Width = 456 ActiveSheet.Shapes("Graphique 1").Height = 456 End Sub
-- Amicales Salutations Retirer A_S_ pour répondre. XL 97 / 2000 / 2002 Pour suivre le forum : news://msnews.microsoft.com/microsoft.public.fr.excel (Voulez-vous vous abonner ? -> Oui)
"pirabru" a écrit dans le message de
news:1c4cf01c42202$ec0b50a0$ Bonjour,
je voudrais affecter à plusieurs grapiques un taille identique. Pour ce faire, la solution que j'envisage est de faire une macro qui règle la taille du graphique sélectionné à la taille voulue (par exemple 10cm * 10 cm). J'ai essayé d'utiliser Selection.ShapeRange.Height = HauteurDésirée, mais ça ne marche pas, la méthode n'étant pas géré par cet objet. Quelqu'un peut-il me dire comment faire ? Si qq a une autre solution, je suis également preneur. merci d'avance, a+
.
merci, ça fonctionne en effet de manière là, mais je ne
trouve pas le moyen d'affecter cette taille au graphique
sélectionné. Il me faudrait quelque chose comme
ActiveShape, l'équivalent de ActiveSheet ou ActiveCell,
mais ce contrôle n'existe pas. Qq a-t-il une idée?
a+
-----Message d'origine-----
Bonjour,
Ceci, à adapter, pourrait convenir
Sub taille()
ActiveSheet.Shapes("Graphique 1").Width = 456
ActiveSheet.Shapes("Graphique 1").Height = 456
End Sub
--
Amicales Salutations
Retirer A_S_ pour répondre.
XL 97 / 2000 / 2002
Pour suivre le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)
"pirabru" <anonymous@discussions.microsoft.com> a écrit
dans le message de
je voudrais affecter à plusieurs grapiques un taille
identique. Pour ce faire, la solution que j'envisage est
de faire une macro qui règle la taille du graphique
sélectionné à la taille voulue (par exemple 10cm * 10 cm).
J'ai essayé d'utiliser Selection.ShapeRange.Height =
HauteurDésirée, mais ça ne marche pas, la méthode n'étant
pas géré par cet objet.
Quelqu'un peut-il me dire comment faire ?
Si qq a une autre solution, je suis également preneur.
merci d'avance, a+
merci, ça fonctionne en effet de manière là, mais je ne trouve pas le moyen d'affecter cette taille au graphique sélectionné. Il me faudrait quelque chose comme ActiveShape, l'équivalent de ActiveSheet ou ActiveCell, mais ce contrôle n'existe pas. Qq a-t-il une idée?
a+
-----Message d'origine----- Bonjour, Ceci, à adapter, pourrait convenir
Sub taille() ActiveSheet.Shapes("Graphique 1").Width = 456 ActiveSheet.Shapes("Graphique 1").Height = 456 End Sub
-- Amicales Salutations Retirer A_S_ pour répondre. XL 97 / 2000 / 2002 Pour suivre le forum : news://msnews.microsoft.com/microsoft.public.fr.excel (Voulez-vous vous abonner ? -> Oui)
"pirabru" a écrit dans le message de
news:1c4cf01c42202$ec0b50a0$ Bonjour,
je voudrais affecter à plusieurs grapiques un taille identique. Pour ce faire, la solution que j'envisage est de faire une macro qui règle la taille du graphique sélectionné à la taille voulue (par exemple 10cm * 10 cm). J'ai essayé d'utiliser Selection.ShapeRange.Height = HauteurDésirée, mais ça ne marche pas, la méthode n'étant pas géré par cet objet. Quelqu'un peut-il me dire comment faire ? Si qq a une autre solution, je suis également preneur. merci d'avance, a+
.
Alain CROS
bonjour
With ActiveChart.Parent .Top = 100 .Left = 100 .Width = 300 .Height = 200 End With
Alain CROS
"pirabru" a écrit dans le message de news: 17d3c01c42211$98fd6bf0$ merci, ça fonctionne en effet de manière là, mais je ne trouve pas le moyen d'affecter cette taille au graphique sélectionné. Il me faudrait quelque chose comme ActiveShape, l'équivalent de ActiveSheet ou ActiveCell, mais ce contrôle n'existe pas. Qq a-t-il une idée?
a+
-----Message d'origine----- Bonjour, Ceci, à adapter, pourrait convenir
Sub taille() ActiveSheet.Shapes("Graphique 1").Width = 456 ActiveSheet.Shapes("Graphique 1").Height = 456 End Sub
-- Amicales Salutations Retirer A_S_ pour répondre. XL 97 / 2000 / 2002 Pour suivre le forum : news://msnews.microsoft.com/microsoft.public.fr.excel (Voulez-vous vous abonner ? -> Oui)
"pirabru" a écrit dans le message de
news:1c4cf01c42202$ec0b50a0$ Bonjour,
je voudrais affecter à plusieurs grapiques un taille identique. Pour ce faire, la solution que j'envisage est de faire une macro qui règle la taille du graphique sélectionné à la taille voulue (par exemple 10cm * 10 cm). J'ai essayé d'utiliser Selection.ShapeRange.Height >HauteurDésirée, mais ça ne marche pas, la méthode n'étant pas géré par cet objet. Quelqu'un peut-il me dire comment faire ? Si qq a une autre solution, je suis également preneur. merci d'avance, a+
.
bonjour
With ActiveChart.Parent
.Top = 100
.Left = 100
.Width = 300
.Height = 200
End With
Alain CROS
"pirabru" <anonymous@discussions.microsoft.com> a écrit dans le message de news: 17d3c01c42211$98fd6bf0$a001280a@phx.gbl...
merci, ça fonctionne en effet de manière là, mais je ne
trouve pas le moyen d'affecter cette taille au graphique
sélectionné. Il me faudrait quelque chose comme
ActiveShape, l'équivalent de ActiveSheet ou ActiveCell,
mais ce contrôle n'existe pas. Qq a-t-il une idée?
a+
-----Message d'origine-----
Bonjour,
Ceci, à adapter, pourrait convenir
Sub taille()
ActiveSheet.Shapes("Graphique 1").Width = 456
ActiveSheet.Shapes("Graphique 1").Height = 456
End Sub
--
Amicales Salutations
Retirer A_S_ pour répondre.
XL 97 / 2000 / 2002
Pour suivre le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)
"pirabru" <anonymous@discussions.microsoft.com> a écrit
dans le message de
je voudrais affecter à plusieurs grapiques un taille
identique. Pour ce faire, la solution que j'envisage est
de faire une macro qui règle la taille du graphique
sélectionné à la taille voulue (par exemple 10cm * 10 cm).
J'ai essayé d'utiliser Selection.ShapeRange.Height >HauteurDésirée, mais ça ne marche pas, la méthode n'étant
pas géré par cet objet.
Quelqu'un peut-il me dire comment faire ?
Si qq a une autre solution, je suis également preneur.
merci d'avance, a+
With ActiveChart.Parent .Top = 100 .Left = 100 .Width = 300 .Height = 200 End With
Alain CROS
"pirabru" a écrit dans le message de news: 17d3c01c42211$98fd6bf0$ merci, ça fonctionne en effet de manière là, mais je ne trouve pas le moyen d'affecter cette taille au graphique sélectionné. Il me faudrait quelque chose comme ActiveShape, l'équivalent de ActiveSheet ou ActiveCell, mais ce contrôle n'existe pas. Qq a-t-il une idée?
a+
-----Message d'origine----- Bonjour, Ceci, à adapter, pourrait convenir
Sub taille() ActiveSheet.Shapes("Graphique 1").Width = 456 ActiveSheet.Shapes("Graphique 1").Height = 456 End Sub
-- Amicales Salutations Retirer A_S_ pour répondre. XL 97 / 2000 / 2002 Pour suivre le forum : news://msnews.microsoft.com/microsoft.public.fr.excel (Voulez-vous vous abonner ? -> Oui)
"pirabru" a écrit dans le message de
news:1c4cf01c42202$ec0b50a0$ Bonjour,
je voudrais affecter à plusieurs grapiques un taille identique. Pour ce faire, la solution que j'envisage est de faire une macro qui règle la taille du graphique sélectionné à la taille voulue (par exemple 10cm * 10 cm). J'ai essayé d'utiliser Selection.ShapeRange.Height >HauteurDésirée, mais ça ne marche pas, la méthode n'étant pas géré par cet objet. Quelqu'un peut-il me dire comment faire ? Si qq a une autre solution, je suis également preneur. merci d'avance, a+
.
pirabru
merci, c'est exactement ce qu'il me fallait.
bonne fin de journée
-----Message d'origine----- bonjour
With ActiveChart.Parent .Top = 100 .Left = 100 .Width = 300 .Height = 200 End With
Alain CROS
"pirabru" a écrit dans le message de news: 17d3c01c42211$98fd6bf0
$
merci, ça fonctionne en effet de manière là, mais je ne trouve pas le moyen d'affecter cette taille au graphique sélectionné. Il me faudrait quelque chose comme ActiveShape, l'équivalent de ActiveSheet ou ActiveCell, mais ce contrôle n'existe pas. Qq a-t-il une idée?
a+
-----Message d'origine----- Bonjour, Ceci, à adapter, pourrait convenir
Sub taille() ActiveSheet.Shapes("Graphique 1").Width = 456 ActiveSheet.Shapes("Graphique 1").Height = 456 End Sub
-- Amicales Salutations Retirer A_S_ pour répondre. XL 97 / 2000 / 2002 Pour suivre le forum : news://msnews.microsoft.com/microsoft.public.fr.excel (Voulez-vous vous abonner ? -> Oui)
"pirabru" a écrit dans le message de
news:1c4cf01c42202$ec0b50a0$ Bonjour,
je voudrais affecter à plusieurs grapiques un taille identique. Pour ce faire, la solution que j'envisage est de faire une macro qui règle la taille du graphique sélectionné à la taille voulue (par exemple 10cm * 10 cm).
J'ai essayé d'utiliser Selection.ShapeRange.Height = HauteurDésirée, mais ça ne marche pas, la méthode n'étant pas géré par cet objet. Quelqu'un peut-il me dire comment faire ? Si qq a une autre solution, je suis également preneur. merci d'avance, a+
.
.
merci, c'est exactement ce qu'il me fallait.
bonne fin de journée
-----Message d'origine-----
bonjour
With ActiveChart.Parent
.Top = 100
.Left = 100
.Width = 300
.Height = 200
End With
Alain CROS
"pirabru" <anonymous@discussions.microsoft.com> a écrit
dans le message de news: 17d3c01c42211$98fd6bf0
$a001280a@phx.gbl...
merci, ça fonctionne en effet de manière là, mais je ne
trouve pas le moyen d'affecter cette taille au graphique
sélectionné. Il me faudrait quelque chose comme
ActiveShape, l'équivalent de ActiveSheet ou ActiveCell,
mais ce contrôle n'existe pas. Qq a-t-il une idée?
a+
-----Message d'origine-----
Bonjour,
Ceci, à adapter, pourrait convenir
Sub taille()
ActiveSheet.Shapes("Graphique 1").Width = 456
ActiveSheet.Shapes("Graphique 1").Height = 456
End Sub
--
Amicales Salutations
Retirer A_S_ pour répondre.
XL 97 / 2000 / 2002
Pour suivre le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)
"pirabru" <anonymous@discussions.microsoft.com> a écrit
dans le message de
je voudrais affecter à plusieurs grapiques un taille
identique. Pour ce faire, la solution que j'envisage est
de faire une macro qui règle la taille du graphique
sélectionné à la taille voulue (par exemple 10cm * 10
cm).
J'ai essayé d'utiliser Selection.ShapeRange.Height =
HauteurDésirée, mais ça ne marche pas, la méthode n'étant
pas géré par cet objet.
Quelqu'un peut-il me dire comment faire ?
Si qq a une autre solution, je suis également preneur.
merci d'avance, a+
With ActiveChart.Parent .Top = 100 .Left = 100 .Width = 300 .Height = 200 End With
Alain CROS
"pirabru" a écrit dans le message de news: 17d3c01c42211$98fd6bf0
$
merci, ça fonctionne en effet de manière là, mais je ne trouve pas le moyen d'affecter cette taille au graphique sélectionné. Il me faudrait quelque chose comme ActiveShape, l'équivalent de ActiveSheet ou ActiveCell, mais ce contrôle n'existe pas. Qq a-t-il une idée?
a+
-----Message d'origine----- Bonjour, Ceci, à adapter, pourrait convenir
Sub taille() ActiveSheet.Shapes("Graphique 1").Width = 456 ActiveSheet.Shapes("Graphique 1").Height = 456 End Sub
-- Amicales Salutations Retirer A_S_ pour répondre. XL 97 / 2000 / 2002 Pour suivre le forum : news://msnews.microsoft.com/microsoft.public.fr.excel (Voulez-vous vous abonner ? -> Oui)
"pirabru" a écrit dans le message de
news:1c4cf01c42202$ec0b50a0$ Bonjour,
je voudrais affecter à plusieurs grapiques un taille identique. Pour ce faire, la solution que j'envisage est de faire une macro qui règle la taille du graphique sélectionné à la taille voulue (par exemple 10cm * 10 cm).
J'ai essayé d'utiliser Selection.ShapeRange.Height = HauteurDésirée, mais ça ne marche pas, la méthode n'étant pas géré par cet objet. Quelqu'un peut-il me dire comment faire ? Si qq a une autre solution, je suis également preneur. merci d'avance, a+
