Code in 2003 not working in 2007
How can you tell if they are not visible?
--
__________________________________
HTH
Bob
"GregK" wrote in message
...
When I run it in 2007, all of the cells within the range a6:ac3610
filtered
or not turn to orange. When I run the code in 2003, only the cells that
are
visible through the autofilter in range a6:a3610 turn orange.
"Bob Phillips" wrote:
It seems to work for me in 2007. In what way do you feel that it is not
working?
--
__________________________________
HTH
Bob
"GregK" wrote in message
...
Below is part of my code from a macro that worked fine in 2003, but
does
not
work the same in 2007. In 2003, the code would filter a certain field
and
change the interior cell color of only the visibile cells with in the
selection. In 2007, it changes the color of all the cells with in the
range
specified (A6:AC3610). Why is this different in 2007 and how do I
correct
it. Any help is greatly appreciated. Thanks.
Range("A6:ac3610").Select
Selection.FormatConditions.Delete
Selection.FormatConditions.Add Type:=xlExpression, Formula1:= _
"=IF($A6<"""",IF($G6=2,$aa6=1.1,$aa60))"
Selection.FormatConditions(1).Font.ColorIndex = 50
Selection.FormatConditions.Add Type:=xlExpression, Formula1:= _
"=IF($A6<"""",IF($G6=2,$aa6<2,$aa6<1))"
Selection.FormatConditions(2).Interior.ColorIndex = 3
' Filters spread sheet
Selection.AutoFilter Field:=27, Criteria1:="<1.1", Operator:=xlAnd
' Changes color on visible cells within my range
With Selection.Interior
.ColorIndex = 45
.Pattern = xlSolid
End With
|