I have this loop below that I programmed on my machine at home, but when
I take the same file I run it on at home and the same code and plug it
in on another machine at home or even my machine at work I get an error
that points to the 'If rng.Value < "0" Then line that says

Run-time error '13':
Type mismatch


Code:
--------------------
For i = LaRow To 2 Step -1
Set rng = Range("T" & i)
If rng.Value < "0" Then
Range("A" & i & ":AE" & i).Interior.ColorIndex = 38
Range("A" & i & ":AE" & i).Interior.Pattern = xlSolid
Range("AR" & i).Value = "1"
End If
Next
--------------------


Earlier in the code I have the values in Column T formatted into
currency, like so.


Code:
--------------------
Range("T" & i).Style = "Currency"
--------------------


Maybe that has something to do with it? Any help on this error is
appreciated. Thanks in advance.


--
DKY
------------------------------------------------------------------------
DKY's Profile: http://www.excelforum.com/member.php...o&userid=14515
View this thread: http://www.excelforum.com/showthread...hreadid=393837