Registriert seit: 16.05.2017
Version(en): 2013
04.07.2017, 10:47
(Dieser Beitrag wurde zuletzt bearbeitet: 04.07.2017, 11:12 von Fupi.)
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ß
Registriert seit: 16.05.2017
Version(en): 2013
04.07.2017, 12:21
(Dieser Beitrag wurde zuletzt bearbeitet: 04.07.2017, 12:21 von Fupi.)
Ach Gottchen, ich habe mit Semikola statt Kommata getrennt. My bad!
Registriert seit: 11.04.2014
Version(en): Office 2007
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.
Gruß Stefan
Win 10 / Office 2016
