roundup

[Hans810]

Hi there,


I cannot get the RoundUp formula working in VBA!

Part of the VBA:

xxx declared as Double

xx = Range("F" & n)
xxx = xx * 1 (to make integer from text)
xxxx = RoundUp(xxx, 0)

Can anyone help me on what I am (possibly) doing wrong???

Thx in advance.

BR hans

 

[VoG]

Try

xxxx = WorksheetFunction.RoundUp(xxx, 0)

 

[Hans810]

THX VoG, life can be that simple!!!! Have a good day. hans

 

[GTO]

Hi there,


I cannot get the RoundUp formula working in VBA!

Part of the VBA:

xxx declared as Double

xx = Range("F" & n)
xxx = xx * 1 (to make integer from text)
xxxx = RoundUp(xxx, 0)

Can anyone help me on what I am (possibly) doing wrong???

Thx in advance.

BR hans

Greetings Hans,

Not sure about the need to convert from text to "integer" (single?), but would this work?

xx = Application.WorksheetFunction.Roundup(CInt(Trim(Range("A" & n))), 0)

Hope this helps,

Mark

 

[Hans810]

Hi GTO,

Yours does not quite do what I wanted!
The answer of the first replier works well.
I have not yet figured out why yours is not working!
I found that your expression is not rounding up, but rouding down.

Anyway, Thanks.
Have a nice day,, hans