Problème d'affichage photo

Fermé
thierry75012 Messages postés 4 Date d'inscription samedi 10 septembre 2016 Statut Membre Dernière intervention 11 septembre 2016 - 10 sept. 2016 à 11:07
michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 - 12 sept. 2016 à 07:32
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 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 3 303
10 sept. 2016 à 11:59
Bonjour,

quel logiciel :word, excel, access.... ?
0
thierry75012 Messages postés 4 Date d'inscription samedi 10 septembre 2016 Statut Membre Dernière intervention 11 septembre 2016
10 sept. 2016 à 12:29
bonjour Michel
sous excel
0
michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 3 303
11 sept. 2016 à 08:50
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 samedi 10 septembre 2016 Statut Membre Dernière intervention 11 septembre 2016
11 sept. 2016 à 15:21
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 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 3 303
Modifié par michel_m le 11/09/2016 à 16:43
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 samedi 10 septembre 2016 Statut Membre Dernière intervention 11 septembre 2016 > michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023
Modifié par thierry75012 le 11/09/2016 à 17:24
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 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 3 303 > thierry75012 Messages postés 4 Date d'inscription samedi 10 septembre 2016 Statut Membre Dernière intervention 11 septembre 2016
12 sept. 2016 à 07:32
Bonjour

demande incompréhensible...
0