değişkenininden hemen sonraya gelecek şekilde şu kodu yerleştirin:
Kod:
If IsNull(OnayNo) Or OnayNo = "" Then
MsgBox "Onay No alanını boş bıraktınız. Lütfen seçim yapınız...", vbInformation, "D İ K K A T"
Exit Sub
End If
Anladığım kadarıyla istediğiniz bu...
Kolay gelsin...