automatisches positionieren von Shapes
05.11.2007 18:21:00
Shapes
mit nachfolgendem Code positioniere ich Shapes an die im Code angegebene Position.
Sub Makro3()
ActiveSheet.Shapes.AddShape(msoShapeRectangle, 180, 75#, 30#, 30#).Select
End Sub
Ich möchte nun, daß sich das Rechteck automatisch bei einer vorher markierten/selektierten Zelle positioniert.
Gibt es da eine Möglichkeit?
Gruß
Jürgen