Catégories
Macros VBA

VBA Loadpicture() : macro pour charger une image dans un contrôle ActiveX

Partager :

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).Select

Next 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