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 vote195 views1 answer
Vba get relative cell address
VBA
0 vote189 views1 answer
Vba remove the first character of string
VBA
3 votes175 views1 answer
Vba request json
VBA
0 vote189 views1 answer
Vba excel do not recalculate before save
VBA
2 votes187 views1 answer
Vba ado ace sql alias ignored for calculated column
VBA
0 vote197 views1 answer
Vba multiple optional arguments
VBA
0 vote197 views1 answer
Vba first cell in range
VBA
0 vote177 views1 answer
Worksheet.pastespecial textbox
VBA
1 vote191 views1 answer
Vb.net get name by Cell Click
VBA
0 vote179 views1 answer
Telephon call in vba
VBA