If it is just a checkbox on a sheet then
Newtype = MsgBox("Georgan Window ?", vbYesNo, "Window Type")
If Newtype = vbYes Then CheckBox1 = True

--
--
-John
Please rate when your question is answered to help us and others know what
is helpful.

"AJR" wrote in message
...
I have a Form Check box that needs to be checked if the operator chooses
yes
from a message box.
Newtype = MsgBox("Georgan Window ?", vbYesNo, "Window Type")
If Newtype = vbYes Then CheckBox50.Format.Value = True


When Yes is chosen I get a run Time Error 424
Object Required
--
Andy