Set the value of a textbox equal to a combobox value
I have a combobox on a main form. The main form does not have a record source. The record source of the combobox is a table.
I have a subform on the main form. The subform's record source is a table (different from the one tied to the combobox). I have a textbox in the header area of the subform. I want to set its value to whatever the combobox's value is. If the combobox value changes, I want the textbox value on the subform to change.
This is what I already had under the After Update event of the combobox:
Private Sub MyComboBox_AfterUpdate()
With DoCmd
.SetWarnings False
.Hourglass True
.OpenQuery "DeleteTemporaryTable"
.OpenQuery "PopulateTemporaryTable"
.SetWarnings True
.Hourglass False
End With
Me!MySubform.Form.Requery
Adding this code to the event is causing a 440 run-time error:
Me.MySubform.Form.MyTextbox = Me.MyComboBox
Microsoft Access
Microsoft Access is a rapid application development (RAD) relational database tool. Access can be used for both desktop and web-based applications, and uses VBA (Visual Basic for Applications) as its coding language.
Private Sub Combo1_AfterUpdate()
Me.YourSubformControlName.
End Sub
mx