Problème d'affichage photo

thierry75012 Messages postés 4 Date d'inscription   Statut Membre Dernière intervention   -  
michel_m Messages postés 16602 Date d'inscription   Statut Contributeur Dernière intervention   -
Bonjour
novice dans les code bva
je n arrive pas à afficher les photos dans mon userform lors d'une recherche
pouvez vous me donner une petit coup de main
merci
A voir également:

4 réponses

michel_m Messages postés 16602 Date d'inscription   Statut Contributeur Dernière intervention   3 314
 
Bonjour,

quel logiciel :word, excel, access.... ?
0
thierry75012 Messages postés 4 Date d'inscription   Statut Membre Dernière intervention  
 
bonjour Michel
sous excel
0
michel_m Messages postés 16602 Date d'inscription   Statut Contributeur Dernière intervention   3 314
 
Bonjour

voir ce tuto dans dvP. rubrique : image
https://silkyroad.developpez.com/VBA/ControlesUserForm/#LII-K
0
thierry75012 Messages postés 4 Date d'inscription   Statut Membre Dernière intervention  
 
Bonjour
Merci Michel le tuto m 'a beaucoup aider, mes photos s affiche mais il me dit la photo la photo demandé n'est pas disponible alors qu'elle est bien affiché et je voudrais mettre une phot nopic par défaut ou cas il ne la trouve pas
merci

Voici le code


Private Sub TextBox109_Change()
Dim chemin As String
On Error GoTo absent
'on definie une variable en taille, le dim au dessus, et sa valeur, la ligne en dessous
chemin = TextBox1.Value 'donc chemin = texbox1.value
'pour afficher l'image, nous avons la ligne suivante
Image1.Picture = LoadPicture("C:\Users\LENOVO\Desktop\photo catalogue\" & chemin & ".JPG")
'ou nous retrouvons le repertoire par defaut des images et notre variable
'une petite gestion d'erreur au cas ou l'image n'est pas trouvé
absent: MsgBox "la photo demandé n'est pas disponible"
End Sub
0
michel_m Messages postés 16602 Date d'inscription   Statut Contributeur Dernière intervention   3 314
 
re,

c'est normal car tu devrais sortir de la macro sj il n'y a pas d'erreurs

      'ou nous retrouvons le repertoire par defaut des images et notre variable 
'une petite gestion d'erreur au cas ou l'image n'est pas trouvée
exit sub
absent: MsgBox "la photo demandée n'est pas disponible"
End Sub
0
thierry75012 Messages postés 4 Date d'inscription   Statut Membre Dernière intervention   > michel_m Messages postés 16602 Date d'inscription   Statut Contributeur Dernière intervention  
 
re
Merci Michel cela fonctionne parfaitement
j ai un autre souci si cela ne te dérange pas je voudrais mettre un statut obligatoire dans mon article quand on clique sur validation avant d'enregistrer il ouvre un autre userform avec 3 options de statut a cocher qui doit s'enregistres dans une cellule précise suivant l'id et une fois sélectionné et en cliquant ok l 'enregistrement s'effectue;
Penses tu que cela soit possible
et un grand merci j 'ai moins mal à la tête
0
michel_m Messages postés 16602 Date d'inscription   Statut Contributeur Dernière intervention   3 314 > thierry75012 Messages postés 4 Date d'inscription   Statut Membre Dernière intervention  
 
Bonjour

demande incompréhensible...
0