Number format in vba

  • Thread starter Thread starter gregork
  • Start date Start date
G

gregork

I have the following code for passing some data on to a user form:

Private Sub UserForm_Initialize()
Me.TextBox1.Value = Sheets("Blend Sheet").Range("ac7").Value

End Sub

Works fine except for one thing - I am getting a number in my text box that
has 12 decimal places.
How do I format so the value returned only has 2 decimals?

Regards
gregork
 
You could control the format explicitly, like:

Me.TextBox1.Value = format(Sheets("Blend Sheet").Range("ac7").Value,"0.00")

or you could pick up what's displayed in the worksheet:

Me.TextBox1.Value = Sheets("Blend Sheet").Range("ac7").Text
 
one way:

Me.TextBox1.Value = Format(Sheets("Blend Sheet").Range("ac7").Value, _
"0.00")
 
Back
Top