VBA: Variable nicht definiert

Question

Ich versuche, die IIF-Funktion im folgenden Code zu verwenden, aber es gibt mir einen Compile-Fehler, der besagt, dass "Variable [ist] nicht definiert". Sie weist auf die „Zero“ auf dem fünften Codezeile:

Option Explicit 

Sub macro() 

Dim ws As Worksheet 
With ThisWorkbook.Worksheets("Sheet1") 
    MsgBox IIf(ws.Range("A1") = 0, “Zero”, “Nonzero”) 
End With 

End Sub 

Ich weiß nicht, warum es diesen Fehler ziehen, wie ich dachte, dass der Bereich einer Zelle nicht definiert werden muss. Ich habe auch versucht, den Bereich als eine Variable zu definieren, aber das hat es auch nicht gelöst.

Was wäre das Problem hier?

Answer 1

weil Sie fehlt ws

so entweder setzen es ThisWorkbook.Worksheets("Sheet1") selbst zu sein und gehen so wie diese:

Option Explicit 

Sub macro() 

With ThisWorkbook.Worksheets("Sheet1") 
    MsgBox IIf(.Range("A1") = 0, "Zero", "Nonzero") '<~~ '.Range("A1")' implies that the object following the 'With' keyword is assumed to be just before the dot 
End With 

oder es hat ein anderes Blatt sein, und dann gehen Sie wie dies:

Option Explicit 

Sub macro() 

Dim ws As Worksheet 
set ws =ThisWorkbook.Worksheets("Sheet2") '<~~ set the "new" worksheet 
With ThisWorkbook.Worksheets("Sheet1") 
    MsgBox IIf(ws.Range("A1") = 0, "Zero", "Nonzero") 
End With 

End Sub