On Tuesday, December 18, 2012 5:08:30 AM UTC-8, Ben McClave wrote:
Howard,



Try:



Range("D1:D" & Range("D" & Rows.Count).End(xlUp).Row) _

.SpecialCells(xlCellTypeFormulas, xlErrors).Count



Ben

Thanks,Ben. I had gone to help to see if I could get a list of the ".SpecialCells(xlCellType...., xl#N/A)". Had no luck. I'll try again.

Your suggestion will for sure do the trick.

Thanks again.

Howard