VBA code that's not removing conditional formatting

I have this little calendar with few options, everything works as I want it apart from when I click on clear entry.
It removes everything from the cell inclusive of my conditional formatting. Is it possible to have that button only to remove data from the cell and the cell colour fill but not conditional formatting?
Thanks for any help

in Private Sub CommandButton1_Click()
ActiveCell.ClearContents instead of ActiveCell.Clear