Value not appearing to VB

[pilot]

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

 

[zacemmel]

Len(range("Amount").value)

 

[pilot]

If Len(Range("Amount").Value) = 0 Then

This still fails the blank test.

 

[PaddyD]

are you sure the cell is blank? Note that cells with formula generated 'blanks' are not blank - see the example:

Book5
	A	B	C	D
1
2
3	10	Len	Blank
4		0	FALSE
5
6
Sheet1

That said, the len() check should have worked
Paddy

 

[pilot]

It's as blank as the expression on my face right now. No formula but the cell does have data validation to allow Decimal between .01 and 200000 and the cell is named. These wouldn't be causing the problem, would they?

Earlier in my code are

Dim Amount As String

and

Amount = Workbooks("Sight Draft.xls").Sheets("SDA").Range("Amount")

 

[Juan Pablo González]

If you put in the macro

MsgBox Range("Amount").Value

or

MsgBox Len(Range("Amount").Value)

what do you get ?

 

[pilot]

MsgBox Range("Amount").Value
shows nothing.

MsgBox Len(Range("Amount").Value)
shows 0.

I also have a watch window running and the expected amount or blank is shown, depending on what I enter in the cell.

 

[Juan Pablo González]

Then

<pre>If Len(Range("Amount").Value) = 0 then
'The cell is empty, code here
Exit Sub
End If</pre>

should work ok.

 

[pilot]

I agree, it should. Just to be sure, I 'd out my line and pasted yours in but it didn't change a thing. Baffling!

 

[pilot]

Anyone have an idea why the last part of my original post (False) isn't working either?