1) Create a button which executes VBA code. The code will check the value
of a cell for example "C1" and if the contents are "False" put a value of
"True there and vice versa.
1.Right click on the toolbar, from the popup select control box.
2.Select a command button from the control box on your sheet
3.Double click on the command button to open the code window and past
following codes
Code
-------------------
Private Sub CommandButton1_Click()
Sheet1.Range("A1").Value = Not CBool(Sheet1.Range("A1").Value)
End Sub