Hi ron, where would i insert that code.
--
BD3


"Ron de Bruin" wrote:

Hi bigdaddy3

With code

On Error Resume Next
ActiveSheet.UsedRange.SpecialCells(xlCellTypeBlank s).Interior.ColorIndex = 3
On Error GoTo 0

Mnual

Select your data
F5
Special..Blanks
OK
Choose a color in the formatting toolbar



--
Regards Ron de Bruin
http://www.rondebruin.nl


"bigdaddy3" wrote in message ...
i would like to automatically color all blank cells unfilled which can vary
on each sheet at close of workbook,any suggestions .The total number of blank
cells will be no more than 100
--
BD3