Microsoft 365 Résolu - Fichier introuvable (image VBA)

Angus HEYERDAHL à dit:

Bonjour à tous,

Depuis quelques temps, lorsque j’essaie de mettre une image dans un Userform de cette manière

VB:

Private Sub UserForm_initialize()
Dim Chemin As String
Chemin = "C:\Users\Mon nom\Pictures\Blason.jpg"
Me.Image1.Picture = LoadPicture("Chemin")
End Sub

Il me met un message d'erreur "erreur d'exécution 53 : fichier introuvable

même en essayant de charger l'image via les propriétés ça ne fonctionne pas

J'ai bien vérifié le chemin, plusieurs extensions, etc, mais rien ne fonction.

Quelqu'un pourrait m'aider, svp

Cliquez pour agrandir...

Me.Image1.Picture = LoadPicture(Chemin)

Cliquez pour agrandir...

Angus HEYERDAHL à dit:

Il me met un message d'erreur "erreur d'exécution 53 : fichier introuvable

Cliquez pour agrandir...

Angus HEYERDAHL à dit:

Je vais essayer sur sur le C dans un premier temps et sur les autres lecteurs

Cliquez pour agrandir...

Angus HEYERDAHL à dit:

Là je suis embêté
Le problème arrive sur mon pc au boulot
Là je suis rentré chez moi et aucun problème

Cliquez pour agrandir...

Jacky67 à dit:

Bonjour à tous
Perso, je n'éprouve aucune difficulté quand les parenthèses de Chemin sont enlevées...
Me.Image1.Picture = LoadPicture(Chemin)

Cliquez pour agrandir...

Angus HEYERDAHL à dit:

Exactement le même

Cliquez pour agrandir...

Angus HEYERDAHL à dit:

Là je suis embêté
Le problème arrive sur mon pc au boulot
Là je suis rentré chez moi et aucun problème
Je vais prendre le fichier test que je viens de créer et l'ouvrir au boulot demain.
Je vous tiendrai au courant
Dans l'attente je suis preneur de toutes solutions que vous me donnerai

Cliquez pour agrandir...

Laurent78 à dit:

Bonjour,
Les parenthèses ? ce ne serait pas plutôt les guillemets ?

Cliquez pour agrandir...