Erwartet: Anweisungsende
02.02.2021 09:21:36
Frederick
Ich arbeite aktuell in VBA und habe ein Problem.
Wenn ich folgende (im Ausgangsdokumt an sich einwandfrei funktionierende) Formel über VBA in eine Zelle schreiben will bekomme ich den Fehler dass ein Anweisungsende erwartet werden würde. Wo liegt mein Fehler? Die Formel an sich funktioniert wenn sie in einer Zelle steht.
ActiveWorkbook.Worksheets("Essenmarken").Range("O13").FormulaLocal = "=WENN(UND(H13="";I13="";SUMME(J13:N13)=0);"";WENN(ODER(H13="";I13="";SUMME(J13:N13)=0;I13<H13);"FEHLER";WENN(UND(I13<HEUTE()+1;I13<>"");"Abgelaufen";WENN(UND(INDEX(J13:N13;$C$4)<>"";UND((HEUTE()+1)>=H13;(HEUTE()+1)<=I13));"Reserviert";"ausst."))))"
Vielen Dank im voraus
Frederick V