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

Überprüfe ob Blattname in Tabelle

Überprüfe ob Blattname in Tabelle
13.01.2017 11:22:19
Max2
Hallo Leute,
ich habe einen Code der jedes Blatt dessen Namen mit "Spur" beginnt auswertet und die Auswertung in das Blatt "Übersicht" einfügt.
Code für Namens Prüfung:

For Each ws In wbkHier.Sheets
If Left(ws.Name, 4) = "Spur" Then
Set wksData = wbkHier.Sheets(ws.Name)
With wksData
Die Spur Blätter haben hinter "Spur" noch ein "_" und eine Zahl.
Jetzt möchte ich aber gerne per Sub oder Function prüfen, ob Spur_xy im Blatt "Übersicht" bereits steht und falls dass der Fall ist soll er den Code nicht ausführen und das Nächste Blatt auf Namen und "Gültigkeit" prüfen.
Was Bietet sich mehr an?
Das im gleichen Sub zu Prüfen
Einen Eigenen Sub dafür zu schreiben
Eine Function dafür zu schreiben

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Überprüfe ob Blattname in Tabelle
13.01.2017 12:36:38
Rudi
Hallo,
For Each ws In wbkHier.Sheets
If Left(ws.Name, 4) = "Spur"  and application.countif(sheets("übersicht").columns(1),ws. _
name)=0 Then
Set wksData = ws
With wksData
Gruß
Rudi
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige