Results 1 to 2 of 2
2014-09-04, 19:44 #1
- Join Date
- Sep 2014
- Thanked 0 Times in 0 Posts
Update Value of Form Field If Another Field Has Specific Data
I have a subform in Access 2013 with certain fields that need to be automatically completed if another field has a particular response.
In one instance, I have a "Contact Last Name Textbox" field where if the "Relationship to Applicant Combobox" field is "Self", the "Contact Last Name Textbox" field needs to autocomplete with the data in the "Applicant Last Name Textbox" field in the form that contains the subform.
I have attempted to create a hidden field for "Applicant Last Name Subtextbox" and using an "Iff" expression have the "Contact Last Name Textbox" field refer to it if the condition I was looking for was met. However, that did not work.
Can anyone help me with a VBA code to use with an "After Update" event? My knowledge of VBA is nil, so the existing threads with similar but different questions don't really help. However, I'm sure I can take that code and run with it for the rest of my fields.
Thanks in advance.
Here is a sample of what I mean (for the sake of clarity):
Last Name [Last Name Textbox]
First Name [First Name Textbox]
Last Name [Contact Last Name Textbox] <-Should agree with [Last Name Textbox] if [Relationship to Applicant Combobox] = "Self"
First Name [Contact First Name Textbox]
Relationship to Applicant [Relationship to Applicant Combobox]
[Hidden Applicant Last Name Subtextbox]
Last edited by Roadhouse*; 2014-09-04 at 19:53.
2014-09-08, 09:02 #2
- Join Date
- Aug 2001
- Evergreen, CO, USA
- Thanked 58 Times in 58 Posts
Is your form constructed so that the [Contact_Last_Name] text box is always entered before the [Relationship_to_Applicant] combo box is chosen? If so you could use a VBA procedure on the combo box that triggers on the AfterUpdate for the combo box. The statement would look like:
If [Relationship_to_Applicant] = "Self" Then [Applicant_Last_Name] = [Contact_Last_Name] Else ' In this case the else clause isn't really necessary End If
This all presumes that you subform is bound to a record set that will automatically update the data in the table(s) involved. If you are using an unbound form, you will need lots of VBA to actually save the data. You will also need to deal with situations where a user uses a mouse to click subform controls in a sequence other than the tab sequence, and you will probably want to set a default for the combo box, presumably "self" in order to issues when that control is skipped. Hope this helps you get going with your form design.Wendell