Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1024to1028
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Blatt löschen, WENN VORHANDEN

Blatt löschen, WENN VORHANDEN
24.11.2008 15:31:09
Macro
Hi,
ich will ein Blatt aus meinem Sheet löschen:
Application.DisplayAlerts = False
Worksheets("Temp").Delete
Application.DisplayAlerts = True
Dieser Code soll aber nur ausgeführt werden, wenn das Blatt auch da ist, sonst kommt eine Fehlermeldung. Wie Prüfe ich vorher ab, ob das Tabellenblatt"TEMP" auch tatsächlich existiert ?
Danke mal und Gruss
Marko

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Blatt löschen, WENN VORHANDEN
24.11.2008 15:36:40
Rudi
Hallo,
in dem Fall würde ich den Fehler ignorieren
Application.DisplayAlerts = False
on error resume Next
Worksheets("Temp").Delete
On Error Goto 0
Application.DisplayAlerts = True
Gruß
Rudi
AW: Blatt löschen, WENN VORHANDEN
24.11.2008 15:37:10
hary
Hallo Marco

On Error Resume Next
Application.DisplayAlerts = False
Worksheets("Temp").Delete
Application.DisplayAlerts = True


Gruss Hary

AW: Blatt löschen, WENN VORHANDEN
24.11.2008 16:02:00
Matthias
Hallo
hier eine weitere Variante: (solltest Du kein On Error Resume Next benutzen wollen)
Code in ein Modul
Option Explicit

Sub Blatt_Loeschen()
Dim x As Long
For x = 1 To Worksheets.Count
If Worksheets(x).Name = "Temp" Then
Application.DisplayAlerts = False
Worksheets(x).Delete
Application.DisplayAlerts = True
Exit For
End If
Next
End Sub


Auch bei Hunderten von Tabellenblättern, geht das relativ flott.
Gruß Matthias

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige