[VBA] Τιμή σε κελί με checkbox

[manolis]

Καλησπέρα σε όλη την παρέα

Το ερωτημα μου απόψε είναι σχετικό με το checkbox.

Αυτό που προσπαθώ να κάνω είναι όταν τσεκάρω το checkbox να παίρνει ένα κελί μια τιμή η οποία θα είναι κάποιος τύπος και όταν το ξετσεκάρω να σβήνει η τιμή

Για παράδειγμα αυτό που κατάφερα να φτιάξω είναι αυτό
Private Sub CheckBox1_Click()
Range("A1").FormulaR1C1 = "=TODAY()"
End Sub

Αλλα είτε το τσεκάρω ειτε το ξετσεκάρω παίρνει πάντα την τιμη

Προσπαθησα να βρω βοήθεια στο excel αλλα δεν τα κατάφερα

Σας ευχαριστώ εκ των προτέρων