Mein Problem ist: In meiner Tabelle werden die Werte in den Zellen gelöscht und die Formeln bleiben erhalten, dies ist auch alles gut so und soll auch so sein.
Nachdem ich das Makro ausgeführt habe, funktionieren die Formeln nicht mehr automatisch, d.h. ich muss jede Zelle anklicken, hinter die Formel klicken und enter drücken, dann rechnet die Formel. Nachdem nächsten Leeren das selbe Problem.
Kann mir jemand helfen, danke.
Gruß Ralf
Hier die Makro:
Sub Abrechnung_leeren()
Dim rngClear As Range
'Tabellenblatt anpassen
Set rngClear = Worksheets("Abrechnung").Range("A26:A32,B26:O33,C34:O34,C38:O38")
On Error Resume Next
rngClear.SpecialCells(xlCellTypeConstants).ClearContents
On Error GoTo 0
Set rngClear = Nothing
End Sub