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

3 votes367 views1 answer
Vba double quote
VBA
0 vote342 views1 answer
Openfiledialog specific folder
VBA
5 votes383 views1 answer
Excel-vba get integer high byte
VBA
0 vote327 views1 answer
Vba code to select image in sheet
VBA
0 vote349 views1 answer
System.Runtime.InteropServices.COMException: 'Call was rejected by callee. (Exception from HRESULT: 0x80010001
VBA
0 vote332 views1 answer
Find the name of the last excel sheet vb
VBA
0 vote331 views1 answer
Excel vba automatic calculation
VBA
0 vote319 views1 answer
Vba string start with
VBA
0 vote365 views1 answer
Priavte sub with multiple handels find sneder
VBA
0 vote310 views1 answer
Create new worksheet excel visual basic
VBA