referencing a subform

[gwilym40]

I've got some access code which has been working fine - not now though!!!
on my main form, a pop-up form appears which when a field upon the pop-up is clicked, it adds data to a subform on the main form - below is part of the code - it now doesn't like the docmd.gotocontrol "frmPAIS_links_SECT" line, despite that being the name of the sub-form. its worked fine before, nothing has changed!!!

DoCmd.OpenForm "frmactions_SECT"
DoCmd.GoToControl "frmPAIS_links_SECT"
DoCmd.GoToControl "ID_link"
DoCmd.GoToRecord acActiveDataObject, , acNewRec

 

[VBslammer]

Try something like this:

Forms("MainForm&quot.Controls("SubformControl&quot.Form.Controls("ControlName&quot.SetFocus

You have to reference the name of the subform control, not the name of the subform itself, in order to reference the subform's controls.

Since you can use the default properties for each object, you can reduce the preceding statement to this:

Forms("MainForm&quot("SubformControl&quot("ControlName&quot.SetFocus

If you need to use the reference more than once, try using a variable:

Dim ctl As Control

Set ctl = Forms("MainForm&quot("SubformControl&quot("ControlName&quot

ctl.SetFocus
ctl = <Value>
Set ctl = Nothing

I've never liked using the GotoControl method. You'll get more predictable results using a direct reference.

VBSlammer

 

[gwilym40]

thats great thanks - unfortunately, it now doesn't like the
DoCmd.GoToRecord acActiveDataObject, , acNewRec??