Rounding result in UserForm Textbox

[rahul_ferns76]

Hi Experts
I have the below VBA, which I need help with rounding the results

What do I need to change to round the result to 2 decimal places?

Private Sub cmdCalculate_Click()
Dim noofLEDs, watts, amp As Double
noofLEDs = txt_LEDS.Text
watts = txt_Watts.Text
amp = txtAmps.Text
txtRAmps.Text = watts / (0.9 * 230)
txtRkVA.Text = (noofLEDs * 3 * (amp / 1000)) / 0.9 / 1000
End Sub

The below is where I need the results rounded up to 2 decimal places
txtRAmps.Text = watts / (0.9 * 230)

Regards
Rahul

[Trebor76]

Hi Rahul,

Try this:

txtRAmps.Text = Round(watts / (0.9 * 230), 2)

Regards,

Robert

[rahul_ferns76]

Thanks, Trebor
Works like a charm

Regards
Rahul

[Trebor76]

You're welcome. Thanks for rep