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 SubformTop As String
Dim SubformLeft As String
SubformLeft = sbfSalesPivot.Left
SubformTop = sbfSalesPivot.Top
Me.sbfSalesPivot.Form.Visible = False
Me.sbfSalesPivot.SourceObject = "frmHome_SalesAnalysisSubform4"
sbfSalesPivot.Top = SubformTop
sbfSalesPivot.Left = SubformLeft
Me.sbfSalesPivot.Form.Visible = True
Me.MySubformFrame.SourceObject = "MySubForm1"
Dim lngSubformTop As Long
Dim lngSubformLeft As Long
lngSubformLeft = Me.sbfSalesPivot.Left
lngSubformTop = Me.sbfSalesPivot.Top