Hi bigdaddy3

With code

On Error Resume Next
ActiveSheet.UsedRange.SpecialCells(xlCellTypeBlanks).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" <[email protected]> wrote in message news:[email protected]...
>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