Shift cell to the left

Shift cell to the left von Fab vom 09.10.2003 09:26:00
- Sollte mit Offset gehen (o.T.) - von Carsten am 09.10.2003 09:27:30
  - AW: Sollte mit Offset gehen (o.T.) - von Fab am 09.10.2003 09:34:46
    - AW: Sollte mit Offset gehen (o.T.) - von Carsten am 09.10.2003 09:40:19
      - AW: Sollte mit Offset gehen - von Fab am 09.10.2003 09:47:38
        
        Gern geschehen - von Carsten am 09.10.2003 09:49:26

Betrifft: Shift cell to the left
von: Fab
Geschrieben am: 09.10.2003 09:26:00

Hallo

Wie kann man in VBA eine aktivierte Zelle eine Zelle nach links verschieben?

Dank + Gruss

Fab

Betrifft: Sollte mit Offset gehen (o.T.)
von: Carsten
Geschrieben am: 09.10.2003 09:27:30

Betrifft: AW: Sollte mit Offset gehen (o.T.)
von: Fab
Geschrieben am: 09.10.2003 09:34:46

Ich kenne Offset nicht. Wie meinst du das?

Gruss

Fab

Betrifft: AW: Sollte mit Offset gehen (o.T.)
von: Carsten
Geschrieben am: 09.10.2003 09:40:19

Hallo Fab,

hier mal ein Auszug aus der VBA-Hilfe:

Syntax

Ausdruck.Offset(RowOffset, ColumnOffset)

Ausdruck Ein erforderlicher Ausdruck, der ein Range-Objekt zurückgibt.

RowOffset Variant optional. Die Anzahl der Zeilen (positiv, negativ oder 0 (Null)), um die der Bereich versetzt werden soll. Bei positiven Werten erfolgt ein Versatz nach unten, bei negativen Werten ein Versatz nach oben. Der Standardwert ist 0.

ColumnOffset Variant optional. Die Anzahl der Spalten (positiv, negativ oder 0 (Null)), um die der Bereich versetzt werden soll. Bei positiven Werten erfolgt ein Versatz nach rechts, bei negativen Werten ein Versatz nach links. Der Standardwert ist 0.

Beispiel zur Offset-Eigenschaft (Range-Objekt)

In diesem Beispiel wird die Zeile, die sich drei Spalten rechts und drei Zeilen unter der aktiven Zelle in Sheet1 befindet, aktiviert.

Worksheets("Sheet1").Activate
ActiveCell.Offset(rowOffset:=3, columnOffset:=3).Activate

Gruß
Carsten