Jefferson Davis 2.Jun.11 02:22 PM a Web browser 1-2-3All ReleasesWindows XP
Good day all,
I have a custom function that I've placed into several hundred cells of a table to count how many cells are formated with a specific "background color" and "text color". The function works fairly well, but it runs slow and if no conditions are met, it results in "0". I modified it with an @IF formula to hide the "0's". It now runs very much slower.
I removed the @IF section of the formula that results in "0's". The sub now runs a little faster.
The cells in question are already "selected" due to a "Find and Replace" script. I created the below script that seems to work on all values above "0".
Sub CellValue_TextColor_Change
Forall Cl In [].Cells
If Cl.CellValue = "0" Then
Cl.Select
Selection.Font.FontColor.ColorName = "white"
End If
End Forall
End Sub
Is there a way to tell the "CellValue" portion of the script to only change the cells containing formulas that result in "1" or greater instead of all cells in the "selected" range?
Any suggestions would be greatly appreciated. Thank you.