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
| A | B | C | D | E | |
|---|---|---|---|---|---|
| 1 | 12,26 | ||||
| 2 | 37,56 | ||||
| 3 | 12,52 | ||||
| 4 | 4,17333333333333 | ||||
| 5 | 1,39111111111111 |
Le résultat
| A | B | C | D | E | |
|---|---|---|---|---|---|
| 1 | 12,26 | 12,26 € | |||
| 2 | 37,56 | 37,56 € | |||
| 3 | 12,52 | 12,52 € | |||
| 4 | 4,17333333333333 | 4,17 € | |||
| 5 | 1,39111111111111 | 1,39 € |