For Each cell In ActiveSheet.UsedRange

If Not cell.HasFormula Then

If cell.Value < "" Then

cell.Value = Application.RoundUp(cell.Value, 0)
End If
End If
Next cell



--
HTH

Bob

(there's no email, no snail mail, but somewhere should be gmail in my addy)

"bobmanuk" wrote in message
...
Hi,

I need to update a fairly large spreadsheet so that all numbers are
rounded
up... using roundup()

Ive looked around and ive come to the conclusion i need to use VBA.

can anyone help?

thanks.

Matty