Bonjours à tous, voilà je viens de finir la BD d'un petit projet Pièces détachées.
Il y a 3 comboBox liés selon les contraintes et une listbox pour afficher le résultat du 3ème.
Et frame Image selon le choix des combobox. Le premier combo dirige le 1er Dossier des Images, et le 3ème fait afficher l'image correspondante à la selection choisi.
Voilà si vous avez une idée pour construire de fichier , bienvenue.
Voilà j'ai avancé il reste plus qu'a faire le comboBox4 à séparer en 2 colonnes et référencer les images dans Userform selon le résultat du combobox4. Et la je sèche. Besoin de vos lumières
Joignez uniquement ici petit fichier modèle construit pour l'occasion. Ce serait réglé depuis longtemps.
Les ComboBox liées peuvent se gérer facilement, avec peu de code (mais simple et intuitif) dans l'Userform lui même, à l'aide de mes modules de service. Ils restituent le numéro de la ligne dans la base correspondant aux choix effectués. Il ne reste qu'à en garnir les autres contrôles des valeurs associées aux critères sur cette même ligne.
Et vous savez surement déjà que lorsque le contrôle à garnir est une image c'est Image1.Picture = LoadPicture(RéférenceFichier)
Private Sub CL_Résultat(Lignes() As Long)
Dim VLgn()
Ligne = Lignes(1)
VLgn = CL.PlgTablo.Rows(Ligne).Resize(, 7).Value
If Not IsEmpty(VLgn(1, 7)) Then Me.Image1.Picture = LoadPicture(VLgn(1, 7))
End Sub
Remarque: Peut être l'évènement BingoUn de CL serait plus indiqué.
Danns la CL_Change:
VB:
Me.Image1.Picture = LoadPicture("")
La colonne 7 (G) sera naturellement supposée contenir la référence du fichier image.
Ce peut être juste le nom si par exemple toutes les images sont dans le même dossier que le classeur. Par sécurité faire devant ChDrive ThisWorkbook.Path: ChDir ThisWork.Path, ou bien faire plutôt Me.Image1.Picture = LoadPicture(ThisWorkbook.Path & "\" & VLgn(1, 7))
Information: Je ne propose plus ce système à base de Dictionary, qui n'évolue donc plus. Après tout les ComboBox ont des facilités de recherches suffisantes. À la place je propose un jeu de module travaillant avec des Variant, appelés sujets, contenant des tableaux.