OVH Cloud OVH Cloud

probleme de chemin

4 réponses
Avatar
gérard
bonsoir

j'ai un petit probleme avec mon chemin merci de votre aide


MaRecherche = UCase(Left(Me.CboChoix.Value, 3)) & TxtNom.Value & ".jpg"

Chemin = ActiveWorkbook.Path
Chemin = Chemin & " \ WareHouse \ " & MaRecherche

Me.MonImage.Picture = LoadPicture("C:\Documents and
Settings\Gérard\Bureau\WareHouse\POTAntidote.jpg")
Me.MonImage.Picture = LoadPicture("''" & Chemin & "''")


merci gérard

4 réponses

Avatar
lSteph
Bonjour,
n'ai pas testé par rapport au contexte mais...

Me.MonImage.Picture = LoadPicture(Chemin)

Chemin doit déjà désigner un nom de fichier approprié
j'aurais employé fichier plutôt que chemin.

Cdlt.

lSteph
gérard avait soumis l'idée :
Me.MonImage.Picture = LoadPicture("''" & Chemin & "''")


--
- -

Avatar
garnote
Salut Stéphane,

Dernier parti, premier arrivé; c'est la grande forme ! ;-)

Bonne journée
Serge



"lSteph" a écrit dans le message de news:
Bonjour,
n'ai pas testé par rapport au contexte mais...

Me.MonImage.Picture = LoadPicture(Chemin)

Chemin doit déjà désigner un nom de fichier approprié
j'aurais employé fichier plutôt que chemin.

Cdlt.

lSteph
gérard avait soumis l'idée :
Me.MonImage.Picture = LoadPicture("''" & Chemin & "''")


--
- -





Avatar
JLuc
*Bonjour gérard*,


bonsoir

j'ai un petit probleme avec mon chemin merci de votre aide


MaRecherche = UCase(Left(Me.CboChoix.Value, 3)) & TxtNom.Value & ".jpg"

Chemin = ActiveWorkbook.Path
Chemin = Chemin & " WareHouse " & MaRecherche
Enleves les espaces "WareHouse"




Me.MonImage.Picture = LoadPicture("C:Documents and
SettingsGérardBureauWareHousePOTAntidote.jpg")
Me.MonImage.Picture = LoadPicture("''" & Chemin & "''")


merci gérard


--
____
( O | O )
--
_oooO_ JLuc _Oooo_

O-O

Avatar
lSteph
Bonjour Serge,

;o))
bonbon, je m'éclipse,..

(le temps de boire un café)
lSteph

garnote a exprimé avec précision :
Salut Stéphane,

Dernier parti, premier arrivé; c'est la grande forme ! ;-)

Bonne journée
Serge


--
- -