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 vote366 views1 answer
Power query M substract minimum value of column -dax
VBA
0 vote380 views1 answer
Excel vba named range exists
VBA
2 votes332 views1 answer
Vba uppercase first letter of each word
VBA
0 vote358 views1 answer
.net crash app
VBA
0 vote377 views1 answer
Vbnet convert charatcer to binary
VBA
8 votes392 views1 answer
Excel vba determine number of elements in a 1D array
VBA
0 vote341 views1 answer
Vba word pdf table to excel
VBA
0 vote357 views1 answer
Switch pictures with buttons vb.net
VBA
0 vote356 views1 answer
Excel vba Column Name to Column Number
VBA
0 vote352 views1 answer
Vbscript for loop
VBA