Follow along with the video below to see how to install our site as a web app on your home screen.
Note: This feature may not be available in some browsers.
Dim strTemp1 As String
Dim strTemp2 As String
Dim strTemp3 As String
strTemp1 = Forms!frmMySubForm!txtText1
strTemp2 = Forms!frmMySubForm!cmbCombo2
strTemp3 = Forms!frmMySubForm!cmbTest3
DoCmd.Close(acForm, "frmYourMainFormName")
Docmd.OpenForm("frmYourMainFormName")
txtMainFormText1 = strTemp1
txtMainFormText2 = strTemp2
txtMainFormText3 = strTemp3
txtMainFormText1.SetFocus