Error 13 - Type Mismatch

[sharky12345]

I'm getting an error 13 Type Mismatch on the following line but I have no idea why, if anyone can assist?

If InStr(cell.Value, "P.T.") Or InStr(cell.Value, "Temp Gt") Or cell.Offset(0, 9).Value = "AP" Or cell.Offset(0, 9).Value = "A/Gt" <> 0 Then

 

[Fluff]

What are you trying to do with the

<>0

at the end of that code?

 

[sharky12345]

Effectively I'm trying to capture if the Cell value matches any of those values....

 

[Fluff]

Try removing it & see what happens.

 

[Norie]

I think you need to split that expression up a bit, or at least stick some parentheses in there.

 

[sharky12345]

Tried your suggestion Fluff but still get the error

 

[Fluff]

In that case what is the content of Cell & Cell.offset(,9), when you get the error?
It may be that you have a formulaic error in one of them.

 

[sharky12345]

Thanks Fluff - the value of that cell can actually be anything at all, but is usually a mix of numbers and text and it is populated from a data connection, so there is no formula in there.....or have I misunderstood what you mean?

 

[Fluff]

No, you haven't misunderstood, but you haven't said what the actual values are when the error occurs.

 

[sharky12345]

Ahh, sorry ...

P.T. 3867 JONES