Hi Joe

If you right click each checkbox, select Format Control and add a cell
link you can then check the value of this cell which will be true if the
box is checked, otherwise false.

In this example I have linked each checkbox to a cell in column Z which
can then be hidden:

Sub CheckBoxes()
With Sheets("Sheet5")
Select Case Application.Caller
Case "Check Box 1"
If .Range("Z5").Value Then
.Range("A5").Value = Format(Now(), "hh:mm:ss")
End If
Case "Check Box 2"
If .Range("Z6").Value Then
.Range("A6").Value = Format(Now(), "hh:mm:ss")
End If
Case "Check Box 3"
If .Range("Z7").Value Then
.Range("A7").Value = Format(Now(), "hh:mm:ss")
End If
'etc
End Select
End With
End Sub

Hope this helps
Rowan

Joe wrote:
Rowan,

Thanks for the help, I assigned the same macro to each of the check boxes
and the time gets updated into the assigned cells, the only problem is that
the time updates when the boxes get unchecked too. I would like to make it
to where when the check boxes are unchecked that the time is erased out of
the cells.

Thanks again,