La fonction LoadPicture dans VBA permet de réaliser une macro pour pour charger une image dans un contrôle ActiveX.
La fonction LoadPicture
La fonction VBA LoadPicture suit la syntaxe suivante :
Loadpicture(variable)
Exemple de macro avec LoadPicture
La macro
Sub nommacro()
Dim c As Range 'Variable
For Each c In Range("A1:A5") 'Plage
'Cellule actuellement sélectionnée
ActiveCell.Offset(0, 0).FormulaR1C1 = _
Loadpicture(c)'Cellule suivante située en bas
ActiveCell.Offset(1, 0).SelectNext c
End Sub
Les données sources
| A | B | C | D | |
|---|---|---|---|---|
| 1 | ||||
| 2 | ||||
| 3 | ||||
| 4 | ||||
| 5 |
Le résultat
| A | B | C | D | |
|---|---|---|---|---|
| 1 | ||||
| 2 | ||||
| 3 | ||||
| 4 | ||||
| 5 |