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

4 votes126 views2 answers
Vba last row
VBA
0 vote191 views1 answer
Vba count all row
VBA
0 vote191 views1 answer
Sendkeys vba selenium
VBA
0 vote173 views1 answer
Excel vba disable alerts
VBA
5 votes198 views1 answer
Excel vba get low byte from INTEGER
VBA
8 votes266 views1 answer
Excel vba determine number of elements in a 2D array
VBA
0 vote183 views2 answers
Delete all controls from list of control vb.net
VBA
0 vote178 views1 answer
Vbnet check if number is even or odd
VBA
0 vote176 views1 answer
Vba nested dictionary
VBA
0 vote182 views1 answer
(SecurityProtocolType)3072 vb.net
VBA