Shapes Height / width ??

Forumthread: Shapes Height / width ??

02.10.2003 19:02:34

Martin T

Tag zusammen

wie positioniere ich denn ein Shape nach rechts und unten? Es gibt ja .left und .top Wo ist der Trick, dass ich das Shape genau in die Zelle kriege?

danke, alleine kriege ich dat nicht raus

gruß Martin

2
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Shapes Height / width ??

02.10.2003 21:48:25

Lutz
dankee..

02.10.2003 22:35:01

Martin T

AW: Shapes Height / width ??

02.10.2003 21:48:25

Lutz

Hallo Martin,

aus Excel/VBA-Beispiele von H.Herber, vielleicht hilft es Dir weiter...


Sub AnOrdnen()
Dim shp As Shape
Dim x As Double, y As Double
x = 5: y = 0
For Each shp In Worksheets("Tabelle1").Shapes
If shp.Type = msoPicture Then
shp.Left = x
shp.Top = y
End If
y = shp.Top + shp.Height
Next shp
End Sub

Gruß
Lutz

dankee..

02.10.2003 22:35:01

Martin T

...werde es sogleich mal probieren

Forumthread: Shapes Height / width ??

2 Beiträge zum Forumthread Beiträge zu diesem Forumthread

2
Beiträge zum Forumthread

Beiträge zu diesem Forumthread