Clever-Excel-Forum

Sers,
kann mir jemand sagen was hieran falsch ist bzw. warum das eine Fehlermeldung (Erwartet: Anweisungsende) gibt?

Code:
Private Sub Label25_Click()

    nAbt = Application.InputBox("Eingabe:")

    Sheets(2).Cells(lIndex, 5).Formula = "=ZÄHLENWENN(Data!A:A;nAbt)"

    Sheets(2).Cells(lIndex, 6).Formula = "=ZÄHLENWENNS(Data!A:A;nAbt;Data!AC:AC;"WAHR")"

End Sub

Gruß

Ach Gottchen, ich habe mit Semikola statt Kommata getrennt. My bad!

Hallo,

du verwendest hier die Formula-Eigenschaft und schreibst die Formel in deutsch. Geht das überhaupt? Meines Wissens brauchst Du bei der Formula-Eigenschaft die englische Schreibweise. Formeln in Zellen schreiben Außerdem solltest du die Anführungszeichen verdoppeln.

Fupi

Fupi

Steffl