Déplacer un objet "image" ds macro

cs_Stef32 Messages postés 5 Date d'inscription lundi 30 mai 2005 Statut Membre Dernière intervention 28 août 2006 - 17 août 2006 à 17:14
mortalino Messages postés 6786 Date d'inscription vendredi 16 décembre 2005 Statut Membre Dernière intervention 21 décembre 2011 - 18 août 2006 à 00:32
Salut,
Je dois manipuler un objet "image" dans une macro.

Pas de souci pour redimmensionner mon image mais pour la placer a un endroit spécifique c'est le quac!
La seule commande que j'ai trouvé est :

Selection.ShapeRange.IncrementLeft -172.5

Cette commande effectue un déplacement en valeur incrémentale ce qui me pose problème.

Dans mon cas, j'ai besoin de pouvoir donner une position en absolu (Ex : 120 depuis la gauche et 50 depuis le haut)

Qqun a une idée ??

Merci d'avance
Stef
A voir également:

2 réponses

mortalino Messages postés 6786 Date d'inscription vendredi 16 décembre 2005 Statut Membre Dernière intervention 21 décembre 2011 17
17 août 2006 à 17:27
Salut,

Essaie ceci :

With Selection.ShapeRange
.Top = 0
.Left = 0
.IncrementLeft 120
.IncrementTop 50
End With

++
0
mortalino Messages postés 6786 Date d'inscription vendredi 16 décembre 2005 Statut Membre Dernière intervention 21 décembre 2011 17
18 août 2006 à 00:32
Arf, suis-je bête !!

With Selection.ShapeRange
  .Top = 50
  .Left = 120
End With

T'économises 2 lignes de code, et c'est plus conventionnel ainsi !
(comme quoi, après une journée de travail, on a les idées plus claires )

@++

  --Mortalino--
Le mystérieux chevalier, "Provençal, le Gaulois"
0
Rejoignez-nous