Hi
Think I know what you mean,
set the enabled property of all controls on the sub form to false
in the onenter event of the subform control, put code to enable them, something like
Dim i as Integer
For i = 0 to me.mysubformcontrolname.FORM.Controls.Count - 1
Select Case me.mysubformcontrolname.FORM.Controls(i).ControlType
Case acTextBox
me.mysubformcontrolname.FORM.Controls(i).Enabled = True
end select
Next i
you may need to apply it to different control types, depending on what you have on your sub form
Regards
Ken Reay
Freelance Solutions Developer
Boldon Information Systems Ltd
Website needs upgrading, but for now -
UK