VBA Fehler beim Kompilieren: Variable nicht definiert.

Question

Hallo,

ich setzte folgenden Code ein um ein Tabellenblatt unabhängig von
dessen Namen zu identifizieren:

For Each Wsheets In Worksheets
If Wsheets.Range(Cells(1, 12)).Value = "Multiplikatorfunktionen"
Then sheetInfo = Wsheets.Name
Next Wsheets

Leider kommt jetzt beim Ausführen für Wsheets folgende
Fehlermeldung:

"Fehler beim Kompilieren: Variable nicht definiert"

Ich habe deswegen schon "Dim Wsheets as Worksheet" versucht,
obwohl ich das bei For...Next meiner Kenntnis nach nicht brauche.
Das hat aber auch nicht funktioniert.

Ich verstehe nicht warum dieser Codeschnipsel hier nicht
funktioniert.
Hoffentlich könnt ihr mir weiterhelfen.

Beste Grüße,
critchm

Answer 1

du hast im Code nicht zu stehen Option Explicit? Dann brauchst Du Dim nicht auch nicht für sheetInfo . Ansonsten ja.

Gruß Hajo

Answer 2

Dein Code ist falsch.

Sub Test()
For Each Wsheets In Worksheets
If Wsheets.Cells(1, 12).Value = "Multiplikatorfunktionen" Then sheetInfo = Wsheets.Name
Next Wsheets
End Sub

Gruß Hajo

Answer 3

Hallo Hajo,

danke, ich hatte Option Explicit und Range(...).
Jetzt funktioniert es!!!

Beste Grüße,
critchm