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

Existiert Sheet?

Existiert Sheet?
29.08.2008 14:26:19
Florian
Hallo zusammen,
wie kann ich bestimmen ob in einer Datei das Worksheet ("XXXX") existiert oder nicht (Code).
Danke und schönes Wochenende!
Florian

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

Betreff
Datum
Anwender
Anzeige
AW: Existiert Sheet?
29.08.2008 14:35:08
Hajo_Zi
Hallo Florian,
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



AW: Existiert Sheet?
29.08.2008 14:43:55
Dani
Hallo Florian,
Die Funktion:

Public Function SheetTest(strName As String) As Boolean
On Error Resume Next
SheetTest = Not Sheets(strName) Is Nothing
End Function


Als Parameter übergibst du den zu überprüfenden Namen und erhälst "True" zurück wenn das Sheet existiert ansinsten "False"
Gruss
Dani

Anzeige
Danke an beide!! oT
29.08.2008 18:48:00
Florian
..

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige