Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1024to1028
1024to1028
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
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)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige