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 vote152 views1 answer
Visual basic run command
VBA
0 vote126 views1 answer
Vbscript check if string is empty
VBA
4 votes76 views2 answers
Vba last row
VBA
0 vote122 views1 answer
Vb net show lines for all axis labels in chart
VBA
1 vote131 views2 answers
Vba string length
VBA
-1 vote134 views1 answer
System.Data.OleDb.OleDbException: 'No value given for one or more required parameters.'
VBA
0 vote124 views2 answers
Delete all controls from list of control vb.net
VBA
0 vote127 views1 answer
Excel vba prevent saving workbook
VBA
0 vote140 views1 answer
Vba count all row
VBA
0 vote129 views1 answer
Putting marquee in vb.net
VBA