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 Workbook_BeforePrint(Cancel As Boolean)
MsgBox "Checking for all required data"
Cancel = True
End Sub
Private Sub Workbook_BeforePrint(Cancel As Boolean)
Cancel = CheckForMissingData()
End Sub
Option Explicit
Function CheckForMissingData() As Boolean
CheckForMissingData = False
If Range("B2") = "" _
Or Range("C2") = "" _
Or Range("D2") = "" Then
CheckForMissingData = True
MsgBox ("Missing some required data")
End If
End Function