I updated the code to the following:
Code:
If Me.subfrmLotInfo.Form.Controls("LotNo") Is Null Then
I verified on the subform there is a text box with the name of "LotNo"
If Me.subfrmLotInfo.Form.Controls("LotNo") Is Null Then
If me.subfrmLotInfo![SectionID] Is Null Then MsgBox "You are required to enter your Material Lot Info", vbCritical, "No Material Lot Info"
If subfrmLotInfo Is Null Then MsgBox "You are required to enter your Material Lot Info", vbCritical, "No Material Lot Info"
Private Sub CMBPrint_Click()
[Actual]>[Est Target]
Private Sub btnAuditEmail_Click() On Error GoTo Error Dim strEMail As String Dim strSubject As String
[Field]=[Forms]![Form Name]![Field]
Leave a comment: