Afficher une photo dans un dossier après saisie variable Résolu

Question

Bonjour, 


Je ne suis pas très bon en VBA, j'ai une macro à faire pour me simplifier une tâche.
Ca ne devrait pas être compliqué mais je sèche.
Je vous explique :
J'ai dans ma feuille excel une base de donnée de référence, et pour chaque référence j'ai une photo dans un dossier.
Je veux demander à l'utilisateur de rentrer la valeur de la référence voulue et de lu iafficher la photo correspondante.
Voilà ce que j'ai...

"Sub affichage()
    Dim Code_Sap As String, Nom_fichier As String
    Code_Sap = InputBox("Entrez le code SAP ou la Référence Fabricant ?", "Code_Sap") 'La variable reçoit la valeur entrée dans l'InputBox
    Nom_fichier = "C:\Users\L020089\Desktop\Nouveau dossier\" & Code_Sap
    Shell ("Nom_fichier.jpg")


End Sub
"

J'ai un problème à donner la valeur de la variable "Nom_fichier" dans le Shell...

En espérant que quelqu'un puisse m'aider! 
Merci beaucoup!

cs_Le Pivert · Accepted Answer

Bonjour à vous 2 ,

pour ouvrir une image dans la visionneuse:

Shell ("rundll32.exe c:\windows\system32\shimgvw.dll,ImageView_Fullscreen" & " " & chemin & nom & ".JPG")


Bon WE

michel_m · Answer

Nom_fichier = "C:\Users\L020089\Desktop\Nouveau dossier\" & Code_Sap & ".jpg"shell(nom_fichier) mais shell ??? pas sûr
 
 Michel

michel_m · Answer

Bonjour,

Où affiches tu  la photo ? dans une cellule  et à quel endroit ? dans un commentaire ? dans un formulaire ? faire un trombinoscope ?

tu dis...

au besoin
Mettreun extrait du  classeur sans données confidentielles (noms bidon) en pièce jointe sur https://www.cjoint.com/
et coller le raccourci  proposé (clic droit) dans le message de réponse
Dans l'attente

michel_m · Answer

Bonjour,

Un "truc" comme ça ?
 
 http://www.cjoint.com/c/EJxhP0KhlWh

il faut enregistrer puis extraire le zip et non l'ouvrir directement
 Michel

Afficher une photo dans un dossier après saisie variable

4 réponses

Votre réponse