B
bstandke
I have the following code:
Private Sub cmdLoadOLE_Click()
Dim myform As Form
On Error Resume Next
Me.OLEFile.Action = acOLEInsertObjDlg
Err.Clear
On Error GoTo 0
'dynamicform is a public string variable passed through openargs
Set myform = Forms(dynamicForm).Form
Forms!myform![Form_frm Master Attachments].Form.Requery
Forms!myform.SetFocus
Forms!myform.mytabControl.Pages("Attachments").SetFocus
DoCmd.Close
'DoCmd.RunCommand acCmdRecordsGoToNew
End Sub
and it returns an error can't find myform ???
Thanks in advance
Private Sub cmdLoadOLE_Click()
Dim myform As Form
On Error Resume Next
Me.OLEFile.Action = acOLEInsertObjDlg
Err.Clear
On Error GoTo 0
'dynamicform is a public string variable passed through openargs
Set myform = Forms(dynamicForm).Form
Forms!myform![Form_frm Master Attachments].Form.Requery
Forms!myform.SetFocus
Forms!myform.mytabControl.Pages("Attachments").SetFocus
DoCmd.Close
'DoCmd.RunCommand acCmdRecordsGoToNew
End Sub
and it returns an error can't find myform ???
Thanks in advance