Selection.Offset - Aktive Zelle innerh. Selecion
29.04.2009 15:36:36
Peter
Guten Tag
Mit nachfolgendem Code wird die bestehende Markierung um eine Spalte nach rechts verschoben.
Sub OffsetToRight()
'' Tastenkombination: Strg+Umschalt+R
Selection.Offset(0, 1).Select
End Sub
Wenn nun beispielsweise der Bereich B2:B12 markiert ist, wird die Markierung nach C2:C12 verschoben.
Wenn innerhalb der Ausgangsmarkierung B2:B12 die Zelle B10 aktiv ist, ist nach Aufrufen des Codes innerhalb der neuen Markierung nicht C10, sondern C2 aktiv.
Kann der Code so erweitert werden, dass auch die x-te Zelle aktiv ist, analog wie bei der Ausgangsmarkierung? Wenn ja, wie ist das zu bewerkstelligen?
Besten Dank für eine Antwort.
Gruss, Peter