Appliquer un code à un groupe de formes déjà constitué

Bonsoir,

Je cherche un moyen de modifier la position d'un groupe de formes déjà constitué. Comment faire référence à ce groupe de formes en VBA ?

Sachant que le code suivant ne donne pas le résultats escompté : par exemple, si je veux changer la position du groupe entier, la coordonnée tapée dans le code s'applique de manière individuelle à chaque forme du groupe, et non au groupe lui-même, du coup les formes se retrouvent "éparpillées".

Me.Shapes("Groupe de formes").Left = 25

Merci d'avance !

bonjour,

je ne parviens pas à reproduire le problème que tu mentionnes

13groupshapes.xlsm (14.87 Ko)

Bonsoir et merci h2so4 pour ta réponse.

J'ai toutefois trouvé comment faire :

Me.Shapes.Range("Groupe de formes").Left = 5

Ce code applique la position Left demandée au groupe entier et non à chaque forme du groupe individuellement. Votre groupe reste donc solidaire visuellement.

NB : pour demander un positionnement à 5 cm (et non 5 pixels), multipliez la valeur demandée par 28.34645669291

Ce qui donne :

Me.Shapes.Range("Groupe de formes").Left = 5 * 28.34645669291

Votre groupe de formes sera ainsi placé à 5 cm depuis le bord gauche de la diapo (et non 5 pixels).

Bonne soirée !

Rechercher des sujets similaires à "appliquer code groupe formes deja constitue"