Sub Chk1OnClick 'Check to see if the value of your checkbox is true If Chk1.Value = true Then 'Turn visibility to false for all controls of a specific page For Each fi in Applet.Forms(frm).Pages(p).Controls Applet.Forms(frm).Pages(p1).Controls(fi.Name).Visible = 0 Next End If 'You may need to add more code for when the checkbox is unchecked End Sub