.offset (1,0) vereinfachen

Forumthread: .offset (1,0) vereinfachen

26.07.2003 13:06:10

Jens

Hallo zusammen,
gibt es eine Möglichkeit nachfolgende Codezeilen zu vereinfachen?
With ActiveCell
.Offset(1, 0).ClearContents
.Offset(1, 1).ClearContents
.Offset(1, 2).ClearContents
End With
Danke für eure hilfe im voraus Jens

1
Beitrag zum Forumthread

Beitrag zu diesem Forumthread

Betreff

Datum

Anwender

AW: .offset (1,0) vereinfachen

26.07.2003 13:11:57

Hajo_Zi

AW: .offset (1,0) vereinfachen

26.07.2003 13:11:57

Hajo_Zi

Hallo Jens


Sub Test()
Range(ActiveCell.Offset(1, 0), ActiveCell.Offset(1, 2)).ClearContents
End Sub

Gruß Hajo
Falls Code vorhanden wurde dieser getestet unter Betriebssystem XP Pro und Excel Version XP SBE.
Bitte kein Mail, Probleme sollen im Forum gelöst werden.
Microsoft MVP für Excel
Das Forum lebt auch von den Rückmeldungen.

Forumthread: .offset (1,0) vereinfachen

1 Beitrag zum Forumthread Beitrag zu diesem Forumthread

1
Beitrag zum Forumthread

Beitrag zu diesem Forumthread