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

1 vote234 views1 answer
S yyyy-MM-dd HH:mm:ss Short Date Local
VBA
0 vote235 views1 answer
Vbscript check if string contains
VBA
0 vote247 views1 answer
Vba word pdf table to excel
VBA
0 vote238 views1 answer
Compare dates vb
VBA
0 vote259 views1 answer
Excel vba protect shapes
VBA
8 votes255 views1 answer
Excel vba make integer
VBA
0 vote240 views1 answer
How to use VBA to add new record in MS Access?
VBA
0 vote234 views1 answer
Excel vba formatconditions range
VBA
0 vote266 views1 answer
Vba nested dictionary
VBA
0 vote228 views1 answer
Vba copy paste value only
VBA