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

3 votes223 views1 answer
Vba make long from two shorts
VBA
0 vote216 views1 answer
Vb window.minimize
VBA
0 vote218 views1 answer
How to set location and size of new from vb
VBA
0 vote263 views1 answer
Vba registry settings
VBA
0 vote220 views1 answer
Get current year vb
VBA
12 votes502 views1 answer
Excel vba write string to text file
VBA
8 votes301 views1 answer
Excel vba make word
VBA
0 vote232 views1 answer
Combobox dropdown search visual basic -excel -C#
VBA
0 vote225 views1 answer
Dynamic array vba
VBA
1 vote242 views1 answer
Vbs run
VBA