I'm using the code below to test for a non-blank entry in the cell named "Amount" but VB is allowing the test to pass with no entry in the field. This is working properly on other fields (except one) that are text. What have I forgotten?
If Len(Amount) = 0 Then
MsgBox "Amount must not be blank", vbExclamation
Cells.Range("Amount").Select
GoTo Lastline
End If
The other one that isn't working is a formula that currently resolves to False but it is passing the test also. Any help appreciated.
If LO = False Then
MsgBox "Problem with Loan Officer field", vbExclamation
Cells.Range("LO").Select
GoTo Lastline
End If
If Len(Amount) = 0 Then
MsgBox "Amount must not be blank", vbExclamation
Cells.Range("Amount").Select
GoTo Lastline
End If
The other one that isn't working is a formula that currently resolves to False but it is passing the test also. Any help appreciated.
If LO = False Then
MsgBox "Problem with Loan Officer field", vbExclamation
Cells.Range("LO").Select
GoTo Lastline
End If