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.
Sub OpenAssetsForm()
Dim f As Form
Set f = New Form_Assets '<--normally used like this
DoCmd.OpenForm f.Name
Debug.Print "Total Controls on Form " & f.Name
'Next 2 lines do the same thing.
Debug.Print Form_Assets.Controls.Count
Debug.Print f.Controls.Count
DoCmd.Close acForm, Form_Assets.Name, acSaveNo
End Sub