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.
Private Sub btnAccessToWord_Click()
On Error GoTo Err_btnAccessToWord_Click
Dim stDocName As String
stDocName = "YOUR REPORT HERE"
DoCmd.OutputTo acReport, stDocName, "Rich Text Format"
Exit_btnAccessToWord_Click:
Exit Sub
Err_btnAccessToWord_Click:
MsgBox Err.Description
Resume Exit_btnAccessToWord_Click
End Sub