change format

  • Thread starter Thread starter Woodi2
  • Start date Start date
W

Woodi2

What code do i need to cahnge the value in the code below to 2 decimal places
and starting with a £ sign

Sheets("RENTAL COSTS").Select
Me.TextBox1.Value = Range("B9").Value
 
If the value in B9 is already formatted nicely:
Me.TextBox1.Value = Activesheet.Range("B9").Text

If it isn't formatted nicely, then something like:
Me.TextBox1.Value = format(Activesheet.Range("B9").Value,"£#,##0.00")
 
You can enter the £ character directly into the format string and save the
Chr function call. To do this, press Alt+0163 from the **number pad** (not
the main keyboard).

Me.TextBox1.Value = Format(Range("B9").Value, "£###,##0.00")
 
Back
Top