Catégories
Macro VBA Conversion Macros VBA

VBA CCur() : macro pour convertir en devises

Partager :

La fonction VBA CCur permet de réaliser une macro pour convertir une variable en octet, soit un nombre entier entre 0 et 255.

La fonction CCur

La fonction VBA CCur suit la syntaxe suivante :

CCur(variable)

Exemple de macro avec CCur

La macro

Sub macro()

Dim c As Range 'Variable

For Each c In Range("A1:A5") 'Colonne

ActiveCell.Offset(0, 0).FormulaR1C1 = _
CCur(c)

ActiveCell.Offset(1, 0).Select

Next c

End Sub

Les données sources

ABCDE
112,26
237,56
312,52
44,17333333333333
51,39111111111111

Le résultat

ABCDE
112,2612,26 €
237,5637,56 €
312,5212,52 €
44,173333333333334,17 €
51,391111111111111,39 €