La fonction FormatCurrency dans VBA est utilisée dans les macros pour formater sous forme de devise.
La fonction Formatcurrency()
La fonction VBA Formatcurrency() suit la syntaxe suivante :
FormatCurrency(variable)
Exemple de macro avec FormatCurrency
La macro
Sub nommacro()
Dim i As Integer
For i = 1 To 5
'Résultat dans Ligne de 1 à 5, Colonne 2
Cells(i, 2).Value = FormatCurrency(Cells(i, 1))Next i
End Sub
Les données sources
| A | B | C | D | E | |
|---|---|---|---|---|---|
| 1 | 112,00 | ||||
| 2 | 37,33 | ||||
| 3 | 12,44 | ||||
| 4 | 4,15 | ||||
| 5 | 1,38 |
Le résultat
| A | B | C | D | E | |
|---|---|---|---|---|---|
| 1 | 112,00 | 112,00 € | |||
| 2 | 37,33 | 37,33 € | |||
| 3 | 12,44 | 12,44 € | |||
| 4 | 4,15 | 4,15 € | |||
| 5 | 1,38 | 1,38 € |