ich würde gerne über einen Button alle Formeln aus Zeile A löschen .ist soetwas möglich. Format der Zelle soll aber erhalten bleiben
Grüße
Sub formel()
If Activecell.Formula Like "=*" Then
ActiveCell.ClearContents
End if
End Sub
Für die Aktive Zelle. Das kannst du dann ja in einer Schleife machen.
Gruß
Chris
Range("A:A").SpecialCells(xlCellTypeFormulas, 23).ClearContents
da der Code mit einem Fehler abbricht, wenn keine formeln vorhanden sind, kann man es so ergänzen:
on Error goto 0
Range("A:A").SpecialCells(xlCellTypeFormulas, 23).ClearContents
On Error Resume Next
den einen oder den anderen Code schreibst du in das Makro des Buttons.
Gruß, Daniel