listbox multicolonne : ouvrir listbox en ayant une ligne spécifique sélectionnée

  • Initiateur de la discussion Initiateur de la discussion azerty6767
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

A

azerty6767

Guest
Bonjour,

J'ai 2 onglets : "MENU" et "BDD"
-> L'onglet 'BDD' contient des valeurs sur 4 colonnes
-> Dans 'Menu', j'ai créé un UserForm avec :
- une ListBox qui charge les 4 colonnes de 'BDD'.
- un bouton "'Ajouter"

Lorsque je sélectionne une ligne de la ListBox et que je clique sur le bouton "Ajouter", la valeur (multicolonne) de la ListBox est copiée dans l'onglet 'Menu'.

Exemple : Titre | Coucou | Sujet A | 6842

--> Tout fonctionne

Ce que je souhaiterais faire : Si "Titre | Coucou | Sujet A | 6842" apparaît déjà dans l'onglet 'Menu', j'aimerais que lorsque j'ouvre le UserForm avec la ListBox, la "bonne ligne" soit sélectionnée (la ligne 'Titre | Coucou | Sujet A | 6842') !

Le critère de recherche étant '6842' uniquement (la valeur de la 4ème colonne)

Ai-je été clair ?...
En résumé, j'aimerais qu'à l'ouverture d'un ListBox, la 'bonne' ligne de la ListBox soit déjà sélectionnée, ligne qui correspond à la valeur '6842'...


Merci d'avance pour votre aide,


Olivier,
 
Re : listbox multicolonne : ouvrir listbox en ayant une ligne spécifique sélectionnée

Bonjour,

un exemple ci-dessous à adapter, enfin si j'ai bien compris :
Code:
Option Explicit
Private Sub UserForm_Initialize()
With ListBox1
    .ColumnCount = 2
    .List = Range("A2:B9").Value
    .Selected(ActiveCell.Row - 2) = True
End With
End Sub
bonne journée
@+
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

Réponses
8
Affichages
876
Retour