source object into form variable

[spinkung]

Hi

i am dynamically changing the sourceobject of a sub form. I need to pass the subforms sourceobject into a function, as a form.

This doesn't seem to work

Dim nexTbl As Form
Set nexTbl = Form(frm_nexus_switcher.SourceObject)

I get an 'access can;t find "my form" error. what's going wrong???

thanks,
spin

 

[MarkK]

The SourceObject property of the subform control is a string. Instead, use the Form property of the subform control to return a reference to the form object in the control...

dim frm as access.form
set frm = me.subformcontrol1.form

Cheers,

 

[spinkung]

worked perfect thanks.