Hallo Steffen,
zu 1:
Es geht natürlich Blätter auszuschließen, kommt aber mit drauf an, wie das ganze gehandhabt werden soll.
Man kann z.B. beim Blattnamen einfach am Anfang ein "+" schreiben oder sonst ein Zeichen.
Dies kann man dann in einer Schleife abfragen. (das ganze ist dann leicht zu händeln, allerdings auch von jedem änderbar)
Oder man kann den internen Namen (CodeName) verwenden. (sieh Beispiel unten
im VBA-Editor stehen links, in dem "Baum" ,bei den Blättern immer 2 Namen dabei.
zu. 2.
Ich vermute jetzt mal du willst einfach alle Blätter durchlaufen und die Zellen Prüfen.
Dann kann man dazu eine Schleife verwenden.
sh ist dann das jeweilige Tabellenblatt welches gerade drann ist
Public Sub a()
Dim sh As Worksheet
For Each sh In ActiveWorkbook.Sheets
If InStr(1, sh.CodeName, "MichNicht") = 0 Then ' Nur die Blätter deren interner Name nicht "MichNicht enthalten
MsgBox sh.Name
End If
Next sh
End Sub
|