Vba format currency

' If A1 value is 2021,543
With Range("A1")
    .NumberFormat = "€#,##0.00"   ' -> €2021,54
    .NumberFormat = "$ #,##0.00"  ' -> $ 2021,54
    .NumberFormat = "#,##0.00 €"  ' -> 2021,54 €
    .NumberFormat = "#,##0€"      ' -> 2022€
  Debug.Print .NumberFormat			' -> #,##0€
End With

Similar codes

0 vote316 views1 answer
Write listbox to text file vb.net
VBA
0 vote305 views1 answer
Vba DisplayGridlines
VBA
0 vote322 views1 answer
System.Runtime.InteropServices.COMException: 'Call was rejected by callee. (Exception from HRESULT: 0x80010001
VBA
3 votes337 views1 answer
Excel vba make long from two shorts
VBA
0 vote302 views1 answer
Excel vba show developer tab
VBA
0 vote306 views1 answer
Vba len variant
VBA
0 vote301 views1 answer
Vba paste values
VBA
0 vote307 views1 answer
Excel run macro every 5 minutes
VBA
0 vote291 views1 answer
Dynamically change drop down list visual basic
VBA
0 vote296 views1 answer
Excel vba disable mouse click
VBA