Type mismatch help

[TheWennerWoman]

I have this

xTax = Sheet4.Range("K" & x).Value ' claim tax

xTax is dimmed as Double as it is monetary (i.e $2.33 etc).

In the source, column K is a formula that will either show a monetary value (i.e $2.33) or "".

My VBA is falling over with type mismatch when it encounters the "". How can I get around it?

I've tried all sorts - I was sure

If Len(xTax) = 0 Then
    xTax = 0
End If

would do the job but it doesn't.

Any pointers appreciated.

 

[Alex Blakenburg]

What do you want it to do when it sees the "" ?
If you are happy to treat it as zero this will work:

    xTax = Val(Sheet4.Range("K" & x).Value) ' claim tax

 

[TheWennerWoman]

What do you want it to do when it sees the "" ?
If you are happy to treat it as zero this will work:

    xTax = Val(Sheet4.Range("K" & x).Value) ' claim tax

Genius!

Many thanks!

 

[Alex Blakenburg]

You're welcome.