Type in on a separate line
Code:
fix: 
data1.Recordset.CancelUpdate 
MsgBox "If a field is not filled in please enter N/A. This Record will not be saved", vbExclamation