Freddy
Freddy
2010-03-20T12:56:06Z
2010-03-20T13:03:16Z
11.9999
8250
20115
120
90
1
False
False
|
| I wrote this code |
| cust no. |
1234 |
Sub aa() |
| Dim c As Range |
| If IsEmpty(Range("c9")) Then |
| MsgBox "Customer No. not entered" |
| ElseIf IsEmpty(Range("c15")) Then |
| MsgBox "Delivery Date not entered, what the hell are you doing?" |
| date |
2010-03-12T00:00:00.000 |
ElseIf IsEmpty(h16 = Blank) Then |
| Blank |
MsgBox "Qty Not entered?" |
| Else |
| 0 |
MsgBox "Everything Entered" |
| order qty |
|
End If |
|
End Sub |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
6
3
7
11
False
False
False
False
False
False