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 vote228 views1 answer
Excel PasteSpecial Format:= can't find the argument
VBA
0 vote218 views1 answer
Vba add month to date
VBA
0 vote224 views1 answer
Vba add spaces
VBA
8 votes376 views1 answer
Excel vba determine number of elements in a 1D array
VBA
2 votes223 views2 answers
Vba code to remove duplicates from a column
VBA
0 vote258 views2 answers
Get unique random number in vb.net
VBA
1 vote2K views1 answer
Vba Remove Case Sensitivity
VBA
0 vote233 views1 answer
Vba compare strings
VBA
0 vote339 views1 answer
Vba line feed
VBA
0 vote215 views1 answer
Vba copy paste value only
VBA