Enable Your Employees To Focus On The Core With Intuitive Onscreen Guidance That is With You At The Moment of Need.
Dim stDocName As String TempVars.Add "strBOForm", Me.Name stDocName = Me.cboReport DoCmd.OpenReport stDocName, acPreview DoCmd.RunCommand acCmdFitToWindow Me.Visible = False
Private Sub Report_Close() Forms(TempVars!strBOForm).Visible = True End Sub
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
Join the community of 500,000 technology professionals and ask your questions.