Mit OffsetToRight verschiebe ich den markierten Bereich um eine Spalte nach rechts.
Nun musste ich des öftern den Bereich um 14 Spalten nach rechts verschieben. Da habe ich die Zeile
Application.Run .... 14 nacheinander aufgeführt.
Das ist sicher suboptimal.
Sub xrechts()
Application.Run "PERSONL.XLS!OffsetToRight"
End Sub
Am liebesten möchte ich mit dem Aufruf gleich eine Variable mitgeben, wieviele Male der Befehl ausgeführt werden soll. Call xrechts(14) würde dann das OffsetToRight 14 mal aufrufen.
Kann mir jemand sagen, wie dann der
Sub xrechts aussehen müsste, dass ich beim Aufruf die entsprechende Variable übergeben kann?
Danke und Gruss, Peter