Conditional Formatting Macro?
One way:
Public Sub FormatSmallValuesWhite()
Dim ws As Worksheet
For Each ws In ActiveWorkbook.Worksheets
With ws.Cells
.FormatConditions.Delete
With .FormatConditions.Add( _
Type:=xlCellValue, _
Operator:=xlBetween, _
Formula1:="-499999", _
Formula2:="499999")
.Font.Color = RGB(255, 255, 255)
End With
End With
Next ws
End Sub
In article ,
mydogpeanut wrote:
Hello,
I would like to write a macro that goes into all the tabs in a work book and
conditional formats the cells to white font if the numbers are equal to or
between negative 499,999.00 and positive 499,999.00 can this be done?
thanks so much.
|