Microsoft 365 Chercher une valeur dans un tableau excel à partir d'une sélection ListBox

cambouis

XLDnaute Nouveau
Bonsoir,

J'ai une listbox SOURCE chargée à partir d'un tableau. En cherchant dans le forum, j'ai trouvé du code pour charger ma listbox DEST à partir de la sélection faite de SOURCE.
Maintenant, à partir de ma listbox DEST, je souhaiterais retrouver chaque item sur le tableau pour appliquer une formule dans le calendrier et ça, je n'ai pas trouvé.

Merci à vous
 

Pièces jointes

  • EQ BLEUE.xlsm
    27 KB · Affichages: 9

mapomme

XLDnaute Barbatruc
Supporter XLD
Bonsoir @cambouis,

Voir le code associé au bouton du formulaire. La variable LIGNE contient successivement les numéros de ligne associés aux éléments de la Listbox de droite.
VB:
Private Sub cmd1_Click()
Dim i As Long, LIGNE As Long
   With DEST_BLEUE
   For i = 0 To .ListCount - 1
      LIGNE = Range("LISTE_BLEUE").Row - 1 + Application.Match(.List(i, 0), Range("LISTE_BLEUE"), 0)
      MsgBox "La ligne de " & .List(i, 0) & " est: " & LIGNE
   Next i
   End With
End Sub
 

Pièces jointes

  • cambouis- EQ BLEUE- v1.xlsm
    30.7 KB · Affichages: 11

cambouis

XLDnaute Nouveau
Bonjour @mapomme,

Merci pour le code, c'est parfait. Je l'ai adapté pour ce que je voulais obtenir.

J'ai maintenant (encore) un problème : malgré un "Unload usf", quand je relance la macro par le bouton, il reste un nom dans la ListBox DEST. Ce n'est pas le cas quand je déroule la macro pas à pas détaillée.
 

Pièces jointes

  • cambouis- EQ BLEUE- v1 (1).xlsm
    32.6 KB · Affichages: 8

Discussions similaires