Bob,

It worked. Thanks again.

Ben

--



"Bob Phillips" wrote:

Dim ctl As Control
For Each ctl In Me.Controls
If TypeName(ctl) = "CheckBox" Then
ctl.Value = False
End If
Next ctl

--
---
HTH

Bob

(change the xxxx to gmail if mailing direct)


"Ben" wrote in message
...
Hi all,

I have a form with a list of 15 checkboxes. How do I use a FOR EACH loop
to uncheck all the checkboxes? Thanks for your help.

Ben

--