This works for me

Sub Checkbox4_Click()
WFState = 1
ActiveSheet.CheckBoxes("CheckBox4").Value = False
End Sub

but it is odd code, if they set it, you un set it?

--
HTH

Bob

(there's no email, no snail mail, but somewhere should be gmail in my addy)

"karthik" wrote in message
ups.com...
Hi,

I would like to know how to reset a check box (It is from the forms
toolbar). At the moment; the checkbox calls a macro:

Sub Checkbox4_Click()
WFState = 1
'ActiveSheet.checkbox4.Value = False
End Sub

The ActiveSheet.checkbox4.Value does not work for some reason!!

--------------------

I have a "Ok" pushbutton, when then does the following

Sub AddNextActions_Click()
Dim sheetName As String

If WFState = 1 Then
sheetName = "Waiting-For"
WFState = 0
Else
sheetName = "Next-Actions"
End If

NewRow = Worksheets(sheetName).Range("B65536").End(xlUp).Ro w + 1

Worksheets(sheetName).Cells(NewRow, 2).Value =
Worksheets("Dashboard").Range("L13").Value
Worksheets("Dashboard").Range("L13").Value = ""

End Sub

-------------------------

Now ideally I would not want to even have the "Checkbox4_Click()"
routine, but would rather like to check the status in the

If WFState = 1 part here. Moreover, I also want to reset the Checkbox
as soon as I have decided which sheet to update.


Cheers

karthik