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

5 votes243 views1 answer
Excel-vba get integer high byte
VBA
1 vote242 views1 answer
Vba refresh pivot table
VBA
0 vote241 views1 answer
Loop through each cell in dgv vbnet
VBA
0 vote227 views1 answer
Worksheet.pastespecial textbox
VBA
0 vote240 views1 answer
Openfiledialog specific folder
VBA
1 vote244 views1 answer
Vba login website
VBA
0 vote239 views1 answer
Vba word pdf table to excel
VBA
0 vote250 views1 answer
Set datetimepicker value to null vb
VBA
4 votes238 views1 answer
Excel vba determine number of elements in an array
VBA
0 vote256 views1 answer
Vba boolean to string
VBA