ROUNDUP DATA HELP

[kshora]

I have a huge data in my excel sheel and want to ROUNDUP all the data to the multiple of 10. How do I do it all together

Thanks and regards

kshora

 

[SteveO59L]

Dim c As Range, rng

Set rng = Worksheets("Sheet1").Range("A1:C10")

For Each c In rng


c = Application.WorksheetFunction.Ceiling(c, 10)
Next c

 

[kshora]

thanks for the reply, however I did not understand how exactly to do it. I am not an expert, just working in excel

 

[SteveO59L]

Start recording a macro, then stop recording.
This will give you an empty macro, just paste the code between the Sub/end sub lines of the macro

Run the macro.

The code will round up all values in the range A1:c10 on Sheet1 to multiples of 10

 

[kshora]

I tried but it comes up with runtime error and highlights "c = Application.WorksheetFunction.Ceiling(c, 10) " in yellow.

What do I do?

 

[SteveO59L]

Curious, works fine for me.

What version of Excel are you using ?

 

[kshora]

Excel 2003

I did change the range to D6:D75 and changed the "sheet1" to "TMK Motorized impeller" same name as my worksheet.

Did this create a problem?

 

[SteveO59L]

Try it on a newly created work book

 

[kshora]

It worked, thank you very much.

I did not do anything different, it first worked on a new work book and than on my worksheets

Thanks once again

 

[kshora]

Hi I am back

when i choose a range with all integers the macro runs fine, however I have lots of ---- (dashes) within the range and it gives the error again when I include the ---- in the range. I cannot romove the ---- as it will creat big problems for me.
Is there any way I can achieve the rounding to multiple 10 without removing the ----

Thanks and regards