Yes, just write the check code in the event handler procedure Document_Close in ThisDocument object, like this
Private Sub Document_Close()
Dim ff As FormField, sInFld As String
For Each ff In ThisDocument.FormFields
If ff.Result = "" Then
Do
sInFld = InputBox("Request date required, please fill in below.")
Loop While sInFld
…
Top comments (0)