Conditional formatting cells that are NOT "Cell Highlighted"
Conditional formatting cells that are NOT "Cell Highlighted"
(OP)
I created an excel spreadsheet with a conditional format of =MOD(ROW(),2)=1 which sets the fill color on alternating rows to allow for easier horizontal reading. The problem is that if the cell is "shaded" by this conditional format, I cannot manually set the fill color (example, to show certain cells as RED to indicate an issue, etc...) Anyone have any ideas?
A confused Semiconductors Guy.
A confused Semiconductors Guy.





RE: Conditional formatting cells that are NOT "Cell Highlighted"
How about adding another conditional formatting? The existing one will have to after the new onw though.
Does this help?
----------------------------------
Hope this helps.
----------------------------------
maybe only a drafter
but the best user at this company!
RE: Conditional formatting cells that are NOT "Cell Highlighted"
This can be done quickly by just formatting 2 rows, and then copy them down as far as you like.
Cheers,
Joerd
Please see FAQ731-376 for tips on how to make the best use of Eng-Tips.
RE: Conditional formatting cells that are NOT "Cell Highlighted"
Eric
Semiconductors Guy
RE: Conditional formatting cells that are NOT "Cell Highlighted"
CODE
For Row = 1 To 65536
For Col = 1 To 256
ActiveSheet.Cells(2 * Row - 1, Col).Interior.Color = RGB(0, 256, 256)
Next
Next
End Sub
Of course if you don't want to do the entire worksheet then adjust the number of rows and columns accordingly
RE: Conditional formatting cells that are NOT "Cell Highlighted"
I only know the VBA answer to your question, you can define a function as follows:
CODE
Select Case r(1, 1).Interior.ColorIndex
Case xlColorIndexNone, xlColorIndexAutomatic
IsFilled = False
Case Else
IsFilled = True
End Select
End Function
Further to Kris44 's solution: a more efficient way would be to process only the so called UsedRange:
CODE
Dim Row As Long
For Row = 1 To ActiveSheet.UsedRange.Rows.Count Step 2
ActiveSheet.Rows(Row).EntireRow.Interior.ColorIndex = 15
Next Row
End Sub
Cheers,
Joerd
Please see FAQ731-376 for tips on how to make the best use of Eng-Tips.