wie bild per vba verschieben? (entweder zur aktuellen position oder zum linken rand.)

27/08/2009 - 15:02 von michlchen | Report spam
servus

wie verschiebe ich ein bild mit vba.

habe ein bild "logo" und will dies auf einigen blàttern wieter nach
rechts verschieben. dabei wàre egal, ob relativ zur aktuellen position
oder ob fest zum linken rand.

suche jetzt nur die richtigen befehle, das bild anzusprechen.
aufzeichnung mit O07 hat nicht geklappt.

danke (claus *g*).
 

Lesen sie die antworten

#1 Claus Busch
27/08/2009 - 15:21 | Warnen spam
Hallo Micha,

Am Thu, 27 Aug 2009 06:02:26 -0700 (PDT) schrieb michlchen:

habe ein bild "logo" und will dies auf einigen blàttern wieter nach
rechts verschieben. dabei wàre egal, ob relativ zur aktuellen position
oder ob fest zum linken rand.



z.B. so:
Dim ws As Worksheet
Dim shp As Shape

For Each ws In Worksheets
For Each shp In ws.Shapes
If shp.Name = "Logo" Then
'Bild um 200 Pixel nach rechts versetzen
'shp.Left = shp.Left + 200
'Bild auf Abstand vom Rand setzen
shp.Left = 400
End If
Next shp
Next


Mit freundlichen Grüssen
Claus Busch
Win XP PRof SP2 / Vista Ultimate SP2
Office 2003 SP2 /2007 Ultimate SP2

Ähnliche fragen