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 vote188 views1 answer
Vba first cell in range
VBA
0 vote207 views1 answer
How to enter Vbox manage commands
VBA
0 vote194 views1 answer
Programmatically copy data from one workshet to another excel
VBA
0 vote172 views1 answer
Excel R1C1 mode
VBA
0 vote162 views1 answer
Excel vba disable copy paste
VBA
2 votes174 views2 answers
Vba code to remove duplicates from a column
VBA
0 vote175 views1 answer
Convert Seconds to HH:MM:SS in VB.Net
VBA
2 votes168 views2 answers
Constructor vb.net
VBA
0 vote185 views1 answer
Vbnet convert charatcer to binary
VBA
0 vote165 views1 answer
Vba paste values
VBA