If *Total* make row white
Well, I just found the culprit; I have this in two cells (one of each):
#VALUE!
#VALUE! Total
How can I compensate for this?
Thanks,
Ryan---
--
Ryan---
If this information was helpful, please indicate this by clicking ''Yes''.
"marcus" wrote:
Hi Ryan
This works fine on my machine. It turns the rows in Column E back to
the normal uncoloured state. If you want it to be white like a ghost
try something like this.
Take care
Marcus
Option Explicit
Option Compare Text
Sub TotalColour()
Dim lastrow As Long, j As Long
lastrow = Cells(Rows.Count, 5).End(xlUp).Row
For j = lastrow To 1 Step -1
If (Cells(j, 5).Value) Like "*Total*" Then
Rows(j).Interior.ColorIndex = 2
End If
Next
End Sub
.
|