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 vote254 views10 answers
Vba excel create event log
VBA
0 vote311 views2 answers
Excel vba close without saving
VBA
1 vote364 views1 answer
Excel vba How to determine if a date falls on the weekend?
VBA
0 vote322 views1 answer
Vba word pdf table to excel
VBA
5 votes328 views1 answer
Excel vba how to unit test vba code
VBA
0 vote321 views1 answer
Change "location" of binding navigator vb
VBA
0 vote365 views1 answer
VBA
VBA
0 vote330 views1 answer
Show unix time in vba
VBA
1 vote357 views1 answer
Excel how to format bytes as KB, MB, GB
VBA
5 votes379 views1 answer
Excel vba low word from Long Integer
VBA