Bereich Löschen bei nicht Aktiven Blatt!

27/06/2008 - 09:18 von Reiner | Report spam
Hallo und guten Morgen zusammen,
ich habe ein kleines Problem.
mit folgender Zeile lösche ich einen Variablen Bereich

Set Ziel = Worksheets("Detailübersicht")
Ziel.Range(Cells(2, 1), Cells(lzz, 7)).ClearContents

also von A2 bis Zeile x Spalte G.
Ist das Blatt aktiv kein Problem nur wenn es nicht aktiv ist, bekomme
ich eine Fehlermeldung.
Was muß ich àndern?

Danke im voraus
Gruß
Reiner
 

Lesen sie die antworten

#1 Claus Busch
27/06/2008 - 09:34 | Warnen spam
Hallo Reiner,

Am Fri, 27 Jun 2008 00:18:31 -0700 (PDT) schrieb Reiner:

Hallo und guten Morgen zusammen,
ich habe ein kleines Problem.
mit folgender Zeile lösche ich einen Variablen Bereich

Set Ziel = Worksheets("Detailübersicht")
Ziel.Range(Cells(2, 1), Cells(lzz, 7)).ClearContents

also von A2 bis Zeile x Spalte G.
Ist das Blatt aktiv kein Problem nur wenn es nicht aktiv ist, bekomme
ich eine Fehlermeldung.
Was muß ich àndern?



probiere es so:
Set Ziel = Worksheets("Detailübersicht")
With Ziel
.Range(.Cells(2, 1), .Cells(lzz, 7)).ClearContents
End With


Mit freundlichen Grüssen
Claus Busch
Win XP Prof SP2 / Vista Ultimate
Office 2003 SP2 / 2007 Ultimate

Ähnliche fragen