Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1780to1784
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

Prüfen ob Sheet im Workbook vorhanden

Prüfen ob Sheet im Workbook vorhanden
04.09.2020 14:00:49
Daniel
Hallo zusammen,
ich möchte gerne per VBA prüfen ob sich das Arbeitsblatt "Apfel" in meinem Workbook befindet und wenn ja soll das Blatt gelöscht werden. Ich weiß das es eine leichte If Abfrage ist nur kenne ich leider den Befehl dafür nicht.
Kann mir hierbei jemand weiterhelfen ?
Vielen Dank im voraus und einen lieben Gruß
Daniel

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Prüfen ob Sheet im Workbook vorhanden
04.09.2020 14:07:44
peterk
Hallo
Ungetest (da schnell geschrieben)

Sub TestA()
Dim Ws as WorkSheet
For each Ws in ThisWorkbook.Worksheets
if ws.name = "Apfel" then
ws.delete
exit for
end if
next ws
end Sub

Oder ohne Schleife
04.09.2020 14:25:29
Zwenn
Hallo zusammen,
so geht's auch. Man kann den Namen des Worksheets natürlich auch als Parameter übergeben:

Sub TestB()
On Error Resume Next
Application.DisplayAlerts = False
ThisWorkbook.Worksheets("Apfel").Delete
Application.DisplayAlerts = True
On Error GoTo 0
End Sub
Viele Grüße,
Zwenn
AW: Prüfen ob Sheet im Workbook vorhanden
04.09.2020 14:25:55
Daniel
Hallo Peter,
Funktioniert super!
Vielen Dank dafür und ein schönes Wochenende.
Gruß
Daniel
Anzeige
wenn gelöst, nicht mehr offen. o.w.T
04.09.2020 14:30:34
Werner

315 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige