Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Prüfen ob es Blatt bereits gibt

Forumthread: Prüfen ob es Blatt bereits gibt

Prüfen ob es Blatt bereits gibt
25.11.2008 15:34:08
Jochen
Hallo zusammen,
ich möchte gerne prüfen, ob es ein Tablenblatt mit einem bestimmten Namen bereits.
Also ungefähr so:
If Sheets(Blattname) existiert then
A=A+1
End IF
Kann mir jemand sagen, wie die richtige Syntax für den Test ist?
Danke & Gruß
Jochen
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Prüfen ob es Blatt bereits gibt
25.11.2008 15:37:20
Hajo_Zi
Hallo Jochen,
feststellen, ob Worksheet vorhanden ist
hier ein Beispiel, welches Du relativ einfach entsprechend abändern kannst:

Sub TabAuswahl()
Dim Sh As Worksheet
Dim sName$
sName = InputBox("Bitte Tabellenname eingeben!")
For Each Sh In Worksheets
If InStr(Sh.Name, sName) > 0 Then
Sh.Select
Exit Sub
End If
Next Sh
Beep
MsgBox "Kein Blatt gefunden!"
End Sub



Anzeige
AW: Prüfen ob es Blatt bereits gibt
25.11.2008 15:49:00
Jochen
Hallo Hajo,
danke, den Rest schaffe ich dann hoffentlich selber.
Schönen Gruß
Jochen
;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige