Afiichage photo à partir du répertoire classeur

V

vins911

XLDnaute Nouveau

• 5 Novembre 2012

• #2

Re : Afiichage photo à partir du répertoire classeur

Quelqu'un svp?

 

Vote positif 0 Vote négatif

Dranreb

XLDnaute Barbatruc

• 5 Novembre 2012

• #3

Re : Afiichage photo à partir du répertoire classeur

Bonjour.
Implantez une image de la boite à outils contrôles dans la feuille.
Elle devrait s'appeler Image1 initialement.
Essayez cette procédure dans le module de la feuille:

VB:

Private Sub Image1_Click()
Me.Image1.Picture = LoadPicture(ThisWorkbook.Path & "\" & Feuil2.[L3].Value & ".jpg")
End Sub

P.S. Affichez la fenêtre de propriétés du contrôle Image1, et mettez sa propriété PictureSizeMode à "3 - fmPictureSizeModeZoom"
À +

 

Dernière édition: 5 Novembre 2012

Vote positif 0 Vote négatif

V

vins911

XLDnaute Nouveau

• 5 Novembre 2012

• #4

Re : Afiichage photo à partir du répertoire classeur

Merci pour ta réponse, qu'entends-tu par "elle devrait s'appelait Image1 initialement"?
J'ai 192 combinaisons différentes donc 192 photos différentes à insérer selon le code obtenu en L3 de la feuille 2 (MATRICE!)

Je peux gérer toutes ces possibilités avec cette ligne VBA?

 

Vote positif 0 Vote négatif

Dranreb

XLDnaute Barbatruc

• 5 Novembre 2012

• #5

Re : Afiichage photo à partir du répertoire classeur

qu'entends-tu par "elle devrait s'appelait Image1 initialement"?

Cliquez pour agrandir...

C'est le nom qu'elle a eu chez moi quand j'ai implanté un contrôle image dans votre feuille (et surtout pas une autre sorte d'image)

Je peux gérer toutes ces possibilités avec cette ligne VBA?

Cliquez pour agrandir...

Oui.

 

Vote positif 0 Vote négatif

V

vins911

XLDnaute Nouveau

• 5 Novembre 2012

• #6

Re : Afiichage photo à partir du répertoire classeur

Merci...

J'ai tapé ce que tu m'as dit dans Visual mais il ne se passe rien?

 

Vote positif 0 Vote négatif

BOISGONTIER

XLDnaute Barbatruc

Repose en paix

• 5 Novembre 2012

• #7

Re : Afiichage photo à partir du répertoire classeur

Bonjour,

Fonction d'affichage d'une image externe

JB

 

Vote positif 0 Vote négatif

Dranreb

XLDnaute Barbatruc

• 5 Novembre 2012

• #8

Re : Afiichage photo à partir du répertoire classeur

J'ai tapé ce que tu m'as dit dans Visual mais il ne se passe rien?

Cliquez pour agrandir...

Il existe au moins, le contrôle Image1, dans la feuille ?
Il doit apparaitre dans la liste de gauche qui surmonte la fenêtre de code, entre "(Général)" et "Worksheet"
Remarque: la procédure se déclenche en cliquant dessus, évidemment.
Et quand vous dites "dans Visual" je suppose que ça veut bien dire dans le module de la feuille et non pas dans un module ordinaire, n'est-ce pas ?
À +

 

Dernière édition: 5 Novembre 2012

Vote positif 0 Vote négatif

V

vins911

XLDnaute Nouveau

• 5 Novembre 2012

• #9

Re : Afiichage photo à partir du répertoire classeur

Dranreb, oui le contrôle image1 existe dans la feuille. Quand je clique sur le contrôle image, cela me mets une erreur "objet requis" et ça lance le débogueur avec la ligne complète surlignée jaune.

BOISGONTIER,

Merci pour ton lien mais je n'arrive pas à en faire quelque chose, désolé je me lance doucement mais surement. Un peu plus d'explications peut-être?

Merci à vous

 

Vote positif 0 Vote négatif

V

vins911

XLDnaute Nouveau

• 5 Novembre 2012

• #10

Re : Afiichage photo à partir du répertoire classeur

BOISGONTIER,

Peux-tu prendre mon fichier que j'ai joins dans mon premier message pour me dire réellement ce que je dois changer dans ton code pour le personnaliser à mon fichier et le faire fonctionner. j'aimerai comprendre à quoi correspond chaque ligne de code, donc peut être qu'en me le personnalisant à mon fichier je me repererai mieux.

Par avance merci.
Salutations,

 

Vote positif 0 Vote négatif

Dranreb

XLDnaute Barbatruc

• 5 Novembre 2012

• #11

Re : Afiichage photo à partir du répertoire classeur

Le CodeName de la feuille nommé "MATRICE" pour Excel est-il bien "Feuil2" pour VBA comme sur l'exemple joint ?
Si oui, rejoignez le fichier, que j'examine ce qui ne va pas.
Mais là, je ne vois plus que ça qui pourrait ne pas aller.
À +

 

Dernière édition: 5 Novembre 2012

Vote positif 0 Vote négatif

V

vins911

XLDnaute Nouveau

• 5 Novembre 2012

• #12

Re : Afiichage photo à partir du répertoire classeur

Je ne comprends pas non plus...

Le fichier est joint !
Merci beaucoup

 

Pièces jointes

• Copie de Fiche Actionneur + distributeur 2.xlsm

  94.3 KB · Affichages: 60

Vote positif 0 Vote négatif

V

vins911

XLDnaute Nouveau

• 5 Novembre 2012

• #13

Re : Afiichage photo à partir du répertoire classeur

BOISGONTIER,

Pour ton code VBA donné, j'arrive à faire quelque chose mais par contre il va me chercher les photos dans "MES DOCUMENTS" et les miennes sont à un autre endroit dans le même dossier que le classeur et ce dossier peut être copié collé sur d'autres PC.

Je ne vois pas dans ton code où il faudrait que je change quelque chose pour qu'il aille chercher les photos à la racine du dossier où est le classeur?

Et les photos ne s'affiche jamais de la taille alors que j'affiche dans une seule cellule toujours la même.

Merci d'avance

 

Vote positif 0 Vote négatif

V

vins911

XLDnaute Nouveau

• 5 Novembre 2012

• #14

Re : Afiichage photo à partir du répertoire classeur

Dranreb, est-ce que j'ai bien fais ce que tu m'as dis? As-tu une idée du pourquoi ça fonctionne pas? Je passe par une cellule "CONCATENER", peut-être que ça fout la m****!!

 

Vote positif 0 Vote négatif

BOISGONTIER

XLDnaute Barbatruc

Repose en paix

• 5 Novembre 2012

• #15

Re : Afiichage photo à partir du répertoire classeur

>Je ne vois pas dans ton code où il faudrait que je change quelque chose pour qu'il aille chercher les photos à la racine du dossier où est le classeur?

Si les images sont dans le répertoire c:\mesdoc\

En B2: =afficheImage(A2&".jpg";"c:\mesdoc\")


JB

 

Vote positif 0 Vote négatif