Habe diesen Code:
Worksheets("Bericht").Range("K2").FormulaLocal = "=Application.WorksheetFunction.CountA(Sheets(1).Columns("A:A"))"
Der Code wird immer in rot angezeigt. Wo ist der Fehler?Gruß Hartmut
Worksheets("Bericht").Range("K2").FormulaLocal = "=Application.WorksheetFunction.CountA(Sheets(1).Columns("A:A"))"
Der Code wird immer in rot angezeigt. Wo ist der Fehler?Worksheets("Bericht").Range("K2") = WorksheetFunction.CountA(Sheets(1).Columns("A:A"))
Es wird bezahlt und das Ergebnis in die Zelle geschrieben. In der Zielzelle hast du dann einen Wert, keine Formel.