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 vote151 views1 answer
Vba line feed
VBA
0 vote157 views1 answer
Vlookup columns not next to each other
VBA
1 vote163 views1 answer
Excel vba unload userform
VBA
4 votes167 views2 answers
Excel vba last column with data
VBA
0 vote157 views1 answer
Vb net show lines for all axis labels in chart
VBA
5 votes188 views1 answer
Excel vba get user selected range
VBA
0 vote162 views1 answer
Send text to clipboard vb.net
VBA
0 vote170 views1 answer
VBA Sort RossetaCode
VBA
0 vote168 views1 answer
Vbnet revrese the order of character in string
VBA
0 vote163 views1 answer
Excel PasteSpecial Format:= can't find the argument
VBA