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")
--
Rick (MVP - Excel)


"JLGWhiz" wrote in message
...
Try this.

Me.TextBox1.Value = Format(Range("B9").Value, Chr(163) & "###,##0.00")



"Woodi2" wrote in message
...
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