Leider scheitert der Versuch mit:
Sub Test()
lz = Cells(Rows.Count, 1).End(xlUp).Rows.Row
Range("AE2:AE" & lz).Formula2Local "=WENN(W2"";1;"0")+WENN(X2"";1;"0")+WENN(Y2"";1;"0")+WENN(Z2"";1;"0")+WENN(AA2"";1;"0")+WENN(AB2"";1;"0") "
End Sub
da auch noch andere Formeln an anderen Stellen folgen sollen, wäre ich für eine Lösung dankbar in der ich die deutsche Schreibweise derFormeln verwenden könnte. (Vielleicht gibts ja auch einen Formel-Translater?)
An anderer Stelle hatte ich es bereits gelesen dass es wohl mit den Anführungszeichen zu tun haben soll? Komme aber leider nicht damit
weiter. Die Formel habe ich jetzt 1zu1 aus der Zelle kopiert. -> Wahrscheinlich müsste die dann noch entsprechend beim Range mit lz angepasst
werden, aber ich denke der Fehler liegt nicht daran. Würde mich über eine Hilfestellung sehr freuen... danke vorab!