erstmal einen schönen 2. Weihnachtstag.
Ich möchte per VBA Shapes in Spalte B nach rechts in Spalte B verschieben. Beginn in B2 bis B1097, also 1096 Shapes. So habe ich es mal begonnen:
Sub ShapesRechts()
Selection.ShapeRange.IncrementLeft 11.25
End Sub
Es sollen aber ALLE verschoben werden, ohne sie vorher manuell markieren zu müssen.Hier fehlt mir die Möglichkiet, dies per Schleife zu automatisieren.
Für eine Lösung vielen Dank und für's drum kümmern.
Gruß, Dieter(Drummer)