Round Up the answer to a calculation which is being performed in VB

Hi there.

Within a VB procedure i have a very simple calculation i.e. Number 1 divided by Number 2 = Answer.
The results returned always have multiple decimal places i.e. 98.827876.

I would like to pass / insert this value into a Textbox which has been embedded into a Worksheet, but I need it to appear as a % with either 1 or no decimal places.

I've added the % symbol in the simplest that I know i.e. TextboxText = Answer & "%" but the end result shows as 98.827876% (I need to lose some/all of the decimal places)

Is it possible to Round Up the "Answer" to the calculation being performed inside the procedure within VB ?

or

Can I limit the value which is being passed to the embedded textbox so that the end result is simply 98.8% or 99% ?

Hope this makes sense.

Any help would be greatly appreciated.

Hi Mark,

round function will do what you are looking for.

TextboxText = Round(Answer,2)

'RoundUp' or just 'Round'?

Code:

---

TextBox1.Text = Format(.9849, "0#.0%")

---

Attachment 28023

Quote:

---

Originally Posted by arangogs

Hi Mark,

round function will do what you are looking for.

TextboxText = Round(Answer,2)

---

Brilliant. Thank you. and so simple too.

ignore

Quote:

---

Originally Posted by Paul_Hossler

'RoundUp' or just 'Round'?

Code:

---

TextBox1.Text = Format(.9849, "0#.0%")

---

Attachment 28023

---

Thank you