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: