Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
652to656
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
652to656
652to656
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Feststellen ob Tabellenblatt vorhanden

Feststellen ob Tabellenblatt vorhanden
22.08.2005 08:49:44
volker
Hei und guten Morgen,
ich habe ein größeres Projekt, in dem ich per Makro feststellen möchte, ob ein Tabellenblatt mit einem bestimmten Namen vorhanden ist.
Ist dies der Fall soll das Makro dieses Tabellenblatt löschen, da es in der Folge wieder neu angelegt wird.
Gibt es einen einfachen Weg dieses Blatt zu identifizieren?
So ungefähr:
If Sheets(aktblatt).exists Then Delete Sheets(aktblatt)
Danke
Volker

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Feststellen ob Tabellenblatt vorhanden
22.08.2005 09:04:56
Eule
Hi Volker
probiers mal damit:

Function BlattExistiert _
(strTestname As String, _
strMappenname As String) _
As Boolean
Dim objMappe As Workbook
Dim objBlatt As Worksheet
BlattExistiert = False
Set objMappe = Application.Workbooks(strMappenname)
For Each objBlatt In objMappe.Worksheets
If objBlatt.Name = strTestname Then
BlattExistiert = True
Exit For
End If
Next objBlatt
End Function

Gruss Eule
AW: Feststellen ob Tabellenblatt vorhanden
22.08.2005 09:23:14
volker
Dank Dir Eule,
eine sehr hilfreiche Funktion,
THX,
Volker
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige