Access - New Record on Subform (Docmd or RunCommand) from that form's Tabbed Form
Hello all!
I have a Main form on that main form I have
1 subform (with it's own subform) AND also
1 Tabbed Form with the tabs of the Tabbed Form having Subform's on them.
I am attempting to transfer info
FROM:
One of the Tabbed Form's Subform
TO
The other Subform of the Main Form
When I click a command button on one of the Tabbed Forms Sub it is transferring the data to the other MainForm's Sub but I can not get it to go to a new record on that form.
When i use Docmd
I get an error
Run-Time error 2498
An Expression you entered is the wrong data type for one of the arguments.
If I put quotations around the Form name I get the object. xxxxxxxx isn't open.
If I put Open/Close parenthesis around it (no quotations) I get the same "wrong argument" error.
How can I correct it?
Microsoft Access
Last Comment
wlwebb
8/22/2022 - Mon
als315
Records should be added to tables, so you can create append query and run it.
Try this syntax if you like follow your idea:
docmd.GoToRecord acDataForm, Forms![frm_Inv]![frm_ctl_MiscInv].Form![sfrm_dta_MiscInvDetails], acNewRec
I hope form [frm_Inv] is opened
wlwebb
ASKER
Thanks for replying Als315
Made that fix. Still get "Run-Time error 2498
An expression you entered is the wrong data type for one of the arguments."
Just to Reiterate, this Main form has 1 subform Plus 1 Tabbed form with Subforms. I'm trying to get it to move data from the Tabbed Form's Sub to the Main Form's Other Subform.
When the Main form opens, the Subform (not the Tabbed form's sub) opens with "New" in the Record. The command button on the Tabbed Form's Sub does work to transfer the first line of data into the Main Form's Subform but when it hits the dcmd....acnewRec is where it is erroring.
Since that SubForm is on the Main Form and both the Main form, the Tabbed Form and the SubForm are all open, isn't the SubForm therefore open?
als315
Will be good if you upload sample DB with this form and related table.
Your help has saved me hundreds of hours of internet surfing.
fblack61
wlwebb
ASKER
Here you go....
when you open it the form is
frm_EstimWorkup
Click on a Process on the Main form which will eventually make the Tab Form Sub visible (left all visible for now) input whatever numbers in the textbox and click save. Should transfer into over to the Mainform's Sub (the right side of the form with blue heading) TestForm-MainTabSub-MainFormSub.accdb
We get it - no one likes a content blocker. Take one extra minute and find out why we block content.
Not exactly the question you had in mind?
Sign up for an EE membership and get your own personalized solution. With an EE membership, you can ask unlimited troubleshooting, research, or opinion questions.
Als315
I get a Run-Time Error '2455'
You entered an expression that has an invalid reference to the property Dirty.
Happens when I input numbers on the Page2 Tabbed form Subform sfrm_WkSh01
Stops on If Me.Dirty Then Me.Dirty=False
Private Sub cmdSave_Click()
Dim i As Integer, J As Integer
Dim rs As DAO.Recordset
J = Me.cboInv.ListCount
Set rs = CurrentDb.OpenRecordset("dta_EstimDtail")
Forms![frm_EstimWorkup]![frm_ctl_Inv].Form![WkShiftID].SetFocus
If Me.Dirty Then Me.Dirty = False
For i = 1 To J
rs.AddNew
als315
Problem is new record on from frm_ctl_Inv. You should save new InvCtlID to table Ctl_Inv before you start add records to table dta_EstimDtail. This new record is added when you press Process01 button on Page1.
When you got an error do you have value in InvCtlID field?
But I have no this error. Check for InvCtlID was added TestForm-MainTabSub-MainFormSub.accdb
Unlimited question asking, solutions, articles and more.
wlwebb
ASKER
Just fixed it.......
There was a Value in the field InvCtlID....
Problem was I had to use the Whole name instead of Me.
Once I changed that it worked......
I googled the error and MSDN came up with an Unbound Form error Knowledgebase Article... discussed about Setting Focus etc.... that lead me to the answer....
Try this syntax if you like follow your idea:
docmd.GoToRecord acDataForm, Forms![frm_Inv]![frm_ctl_M
I hope form [frm_Inv] is opened