Bereich löschen

Forumthread: Bereich löschen

Bereich löschen

27.05.2002 23:06:55

Jens

einen schönen Abend zusammen

wer kann mir helfen?
Ich will mit einem Makro in der act.TB einen Bereich "Teil1" lösche aber vorher prüfen ob er überhaupt existiert um Fehlermeldungen auszuschließen wenn dieser Bereich nicht existiert.

vielen Dank Jens

1
Beitrag zum Forumthread

Beitrag zu diesem Forumthread

Betreff

Datum

Anwender

Re: Bereich löschen

27.05.2002 23:58:06

Ramses

Re: Bereich löschen

27.05.2002 23:58:06

Ramses

Hallo Jens,

versuch mal folgendes:

Sub Bereich_Test()
On Error GoTo Test_Error
Range("Teil2").Select
 
Test_Exit:
Exit Sub
 
Test_Error:
Select Case Err
    Case 1004
        MsgBox Err & ": " & Err.Description & Chr$(13) & "Dieser Bereich existiert nicht"
        Resume Test_Exit
End Select
End Sub

Code eingefügt mit Syntaxhighlighter 1.12

Forumthread: Bereich löschen

1 Beitrag zum Forumthread Beitrag zu diesem Forumthread

1
Beitrag zum Forumthread

Beitrag zu diesem Forumthread