The main form frmInvoiceOrder is open *and* has a record at this point? If
it does not have a record, the attempt to create a *related* record in the
subform may fail.
Your middle paragraph that says the fields copy ok though it does not create
the record. If the fields copy (i.e. you see these values turn up the
subform), but the record is not added? This suggests that the code is
working, but there is another cause why the record is not saved, e.g. there
is another field that is required, but no value is entered.
Then the next paragraph suggests Access is having trouble finding the
object. Unless the main form has been closed by this stage, this may
indicate a Name AutoCorrect problem. See:
http://allenbrowne.com/bug-03.html
Subforms are never open in their own right, i.e. zfrmInvoiceOrder itself is
not part of the Forms collection. You appear to be using the correct
reference though, through the main form, and referring to the Form in the
subform control. You could double-check that the subform *control* is named
zfrmInvoiceOrder, regardless of the name of the form that gets loaded into
the control (its SourceObject).
This approach may help to pinpoint where the error is occurring:
Dim frm As Form
Set frm = Forms![frmInvoiceOrder]![zfrmInvoiceOrder].Form
With Me.ListBox
frm!txtCreatedDate = .Column(1)
frm!txtCreatedTime = .Column(2)
End With
Set frm = Nothing
Hopefully you don't really have a control named ListBox, as that is a
reserved word in VBA.
--
Allen Browne - Microsoft MVP. Perth, Western Australia.
Tips for Access users -
http://allenbrowne.com/tips.html
Reply to group, rather than allenbrowne at mvps dot org.
"Bob" <smileyBob@hotmail.com> wrote in message
news:ps1fc0p3h2c0rbnardus6sn82u0rv47aal@4ax.com...[color=blue]
>
> I have a form called frmListBox that is connected to a table tblListBox.
>
> This is opened from a form called "frmInvoiceOrder" which has a subform[/color]
called "zfrmInvoiceOrder"[color=blue]
> and floats above (ie is pop-up) [frmInvoiceOrder]![zfrmInvoiceOrder]
>
> Private Sub ListBox_DblClick(Cancel As Integer)
> DoCmd.OpenForm "Forms![frmInvoiceOrder]![zfrmInvoiceOrder", , , ,[/color]
acFormAdd[color=blue]
>
> Forms![frmInvoiceOrder]![zfrmInvoiceOrder].Form![txtCreatedDate] =[/color]
Me!ListBox.Column(1)[color=blue]
> Forms![frmInvoiceOrder]![zfrmInvoiceOrder].Form![txtCreatedTime] =[/color]
Me!ListBox.Column(2)[color=blue]
> Forms![frmInvoiceOrder]![zfrmInvoiceOrder].Form![txtFrom] =[/color]
Me!ListBox.Column(3)[color=blue]
> Forms![frmInvoiceOrder]![zfrmInvoiceOrder].Form![txtTo] =[/color]
Me!ListBox.Column(4)[color=blue]
> Forms![frmInvoiceOrder]![zfrmInvoiceOrder].Form![MemoContents] =[/color]
Me!ListBox.Column(5)[color=blue]
> Forms![frmInvoiceOrder]![zfrmInvoiceOrder].Form![txtEbay#] =[/color]
Me!ListBox.Column(6)[color=blue]
> End Sub
>
> Although all of the fields copy from "frmListBox" to[/color]
"Forms![frmInvoiceOrder]![zfrmInvoiceOrder" OK[color=blue]
> I cannot get it to add a new record to/in the subform before it copies the[/color]
record.[color=blue]
>
> The 2 main errors I get are:
>
> error 2012 trying to refer to a form that doesn't exist.
> error 2489 - The object 'Forms![frmInvoiceOrder]![zfrmInvoiceOrder' isn't[/color]
open). but when I get this[color=blue]
> error message, the subform is indeed open - i'm looking right at it!
>
> It seems to me that although the subform is open "inside" the Mainform,[/color]
Access 2000 doesn't[color=blue]
> consider it to be open. Just viewable.
>
> I did consider making an intermediate form and do it from there. I have[/color]
done somethong similar[color=blue]
> before. But this would be an untidy work around
>
> If anyone could help I be most grateful.
>
> Regards Smiley Bob[/color]
