Here is the Cmd code:
Private Sub Command181_Click()
If MsgBox("Warning! You are about to send a LIVE JOB SHEET to a Contractor. Do you wish to continue?", vbYesNo) = vbYes Then
'click the Yes
Dim strDocName As String
Dim strPath As String
strDocName = "Report"
' save report to...