Moving numbers to two decimal places i think...

  • Thread starter Thread starter 4ndy
  • Start date Start date
4

4ndy

well heres my problem- im trying to copy a "total" price from exce
into a vbe using a controlsource, the problem is in excel it display
£593.01 but in vbe i get 593.009, how could i set it up to display
pound sign and take it to the nearest two decimal places
 
Hi 4ndy,

Sub Tester()
Dim MyVar As Double

MyVar = Sheets("Sheet1").Range("A1").Value
MsgBox Format(MyVar, "£#,##0.00")
End Sub
 
Back
Top