Access default value on form and subform

I want to set the default value of 2 fields in a parent form and 2 fields in a subform when a new record is added.

We have 1 table (Table A) containing 1 record having 4 fields that is used to retain the values that I want in the forms.

We have a parent form (Form 1) that contains a subform (Form 2).  Table A is not a data source for either form.  Other tables are required as the data sources.   There are at least 15 form controls on each form.

When a new record is entered into Form 1, we want 2 fields from Table A to be the default value in 2 form controls.  Same when a new record is entered into Form2, we want 2 fields from Table A to be the default value in 2 form controls.

Tried setting the default value of each form controls to the corresponding value in the Table A field but get a #Name error.

Any experts out there that can suggest how I might approach solving this?  Thanks!
clock1Asked:
Who is Participating?
 
SimonConnect With a Mentor Commented:
Yes, it could go into form and subform (so that each new subform line gets the defaults).

The gotcha with it might be that you are 'dirtying' the form, so if user changes their mind about completing a record, they'll need to hit escape to clear the defaults to exit gracefully (or you have to do a me.undo in code if the user chooses not to save the latest record).
0
 
SimonCommented:
something like this pseudocode?

on form_current()
if me.newrecord then
set rsdefaults=currentdb.openrecordset("TableA")
me.control1.value = rsdefaults("ctrl1").value
me.control2.value = rsdefaults("ctrl2").value
set rsdefaults =nothing
end if
end sub

But I'd ask the question why you don't just set the default values in the tabledefs? Is it because you need dynamic defaults?
0
 
clock1Author Commented:
SimonAdept

Believe I can get this to work.
Would this code go into the form_current for each form?
0
 
clock1Author Commented:
Thanks
0
All Courses

From novice to tech pro — start learning today.