VBA-Makro „range.value“ verursacht Fehler

Question

Ich habe diesen Code

Sub ifcitythencity()

If InStr(1, (range("A2").Value), "San Francisco") > 0 Then range.Value("B2") = "San Francisco"

End Sub

Aber wenn ich den Debugger ausführe, erhalte ich die Fehlermeldung „Kompilierungsfehler: Argument nicht optional“ und der zweite „Bereich“ wird hervorgehoben. Was verursacht diesen Fehler?

Answer 1

Sie haben verwendet, range.value("B2")anstatt range("B2").value-

Sub ifcitythencity()

If InStr(1, (range("A2").Value), "San Francisco") > 0 Then range("B2").Value = "San Francisco"

End Sub

Der Fehler

Argument nicht optional

gibt Ihnen einen Hinweis auf das Problem - dierange(arg) Objekt musshaben ein Argument innerhalb der ().