Sub dj()
For Each c In Range("A2:A11")
If c.Value = Int(c.Value) Then
c.Font.Bold = True
End If
Next
End Sub



"Mike" wrote in message
...
I'm an amateur excel user and I've just taught myself how to create a
macro.
I have a bid program that I export a summary sheet to excel. I've set up
a
macro to format column widths and column colors. I want to add to this
macro
to search column A for WHOLE numbers. If the cell in column A is a whole
number, then I want to change that row to bold. Help please?