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 vote289 views2 answers
How to concatenate more than 40 lines in vba
VBA
0 vote300 views1 answer
Vba clear collection
VBA
1 vote239 views1 answer
Vba exit do while
VBA
1 vote331 views1 answer
Excel vba convert text YYYYMMDD to date
VBA
0 vote280 views1 answer
How to set location and size of new from vb
VBA
0 vote304 views1 answer
Excel vba paste all to each sheet in workbook
VBA
0 vote289 views1 answer
Vbnet chart make 0 gridline line different color
VBA
0 vote288 views1 answer
Excel vba textbox forecolor disabled
VBA
0 vote283 views1 answer
Vba timestamp -- milliseconds
VBA
0 vote266 views1 answer
Dynamically change drop down list visual basic
VBA