Formatting number in a UserForm TextBox
Private Sub spnInterestRate_SpinUp()
txtInterestRate.Value = format(cdbl(txtInterestRate.Value) _
+ 0.125,"0.000")
End Sub
-------------------------------------
So, no change in how the initialized value is formatted?
That surprized me. I would never in a zillion years have
been able to come up with this. Well, maybe, someday.
I have seen things like the CDbl but don't know how to
use them, and on this subject, the VBA Help is not helpful
at all. Thanks, Tom. (Do you ever sleep?)
|