One way
Sub makepercentwhole()
For Each c In Range("i3:i14")
If IsNumeric(c) Then c.Value = c * 100
c.NumberFormat = "0.00"
Next
End Sub

--
Don Guillett
Microsoft MVP Excel
SalesAid Software

"Lynda" wrote in message
...
I have a number of very large spreadsheets all with percentages. I want to
change the cells from % to whole numbers. I did this the other day and it
was
obviously something very simple (for me it has to be simple) but for some
reason I have gone completely brain dead and can't remember what I did.

My example is, say 12%.
When I change it to the number format I get 0.12. Obviously if I take away
the 2 decimal places I end up with 0. I want to end up with the number
displayed as 12.

Thanks in advance.