Problème LoadPicture inconnu

Bonjour le forum,
Dans un UserForm, je souhaite insérer une image. J'ai donc dessiné un rectangle avec le controle "image". Définie manuellement dans les propriétés, l'image se charge sans problème.
Par contre, pour faire la même chose en VBA, la fonction "loadpicture" ne semble pas connue (elle reste en minuscule). Pas de trace dans l'aide, pas de trace dans l'explorateur d'objets.
Y aurait-il une référence spécifique à activer?
Voici mon code

Code:

---

1 2 3

UF_Pict.Caption = Cells(Row_Target, 2).Value 'OK UF_Pict.Image1.Picture = loadpicture(Cells(Row_Target, 1).Value & "\" & Cells(Row_Target, 2).Value) 'NOK UF_Pict.Show 'OK

---

Un membre du forum aurait-il une idée pour m'aider à résoudre ce problème?

D'avance merci

Harry

Salut,

Le problème est que tout est caché, alors on ne peux pas voir ce qu'il y a dans le LoadPicture pour vérifier les erreurs.

Cette fonction ne charge pas les png par exemple.

Bonjour Nouveau2,
Merci pour la réponse.
LoadPicture ne donne pas d'erreur. C'est VBA qui ne connait pas la fonction.
D'où la question: faut-il une référence spécifique, une dll, .....?
Bonne journée

Re,

Citation:

---

D'où la question: faut-il une référence spécifique, une dll, .....?

---

Oui, mais c'est assez bizarre, en principe OLE Automation est directement
chargé avec les 3 autres références par défaut (Excel, VBA et Office).

P.S.:
Cette simple macro te trouvera la référence si elle est coché

Code:

---

1 2 3 4 5 6

Sub Test() Dim Item For Each Item In ThisWorkbook.VBProject.References If Item.Name = "stdole" Then MsgBox "Trouvé" Next End Sub

---

Sinon, a cocher.

Re,

La référence OLE Automation n'était pas cochée.
Tout fonctionne comme je le souhaite.
Grand merci pour l'aide pertinente

Harry