Live-Forum - Die aktuellen Beiträge
Datum
Titel
29.03.2024 13:14:12
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
1408to1412
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

Tebellenblatt suchen!

Tebellenblatt suchen!
24.02.2015 11:20:42
NoPa
Hallo,
ich möchte mit VBA prüfen ob, in meiner Mappe eine bestimmtes Tabellenblatt vorhanden ist!
z.B. „Tabelle1“
Wenn „ja“ soll es gelöscht werden wenn nein soll nichts passieren!
Danke für die Hilfe.
Gruß
Norbert

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

Betreff
Datum
Anwender
Anzeige
AW: Tebellenblatt suchen!
24.02.2015 11:27:34
Klaus
Hi Norbert,
hier der Code für ein Blatt namens Tabelle1
Sub BlattXLoeschen()
Const BlattName As String = "Tabelle1"
Application.DisplayAlerts = False
If WksSheetExists(BlattName) Then Sheets(BlattName).Delete
Application.DisplayAlerts = True
End Sub
Function WksSheetExists(sSheet As String) As Boolean
Dim wks As Object
On Error Resume Next
Set wks = Sheets(sSheet)
If Not wks Is Nothing Then
WksSheetExists = True
End If
On Error GoTo 0
End Function
Grüße,
Klaus M.vdT.

AW: Tebellenblatt suchen!
24.02.2015 13:05:04
NoPa
super danke.
Gruß
Norbert

Danke für die Rückmeldung! owT.
24.02.2015 13:05:30
Klaus
.
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige