Microsoft 365 VBA - moteur de recherche

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 !

fuioplde

XLDnaute Nouveau
Bonjour à tous,

Je vous écrit car je souhaite créer un moteur de recherche qui puise ses données dans un tableau, mais je bloque à une étape.
Comme vous pouvez le voir sur mon Excel vous avez une boite de texte, quand on rentre un caractère, les case du tableau DONNEE_COPRO qui contiennent ce caractère se mettent en surbrillance.
La ou je coince c'est que voudrais que la ligne ou un élément est surligné soit intégré dans une boite de liste. Malheureusement je ne pense pas que cela soit possible.
J'ai donc eu l'idée d'ajouter une boite de liste par colonnes :
DONNEE_COPRO[N°] dans la ListBox1
DONNEE_COPRO[NOM] dans la ListBox2
DONNEE_COPRO[ADRESSE] dans la ListBox3
DONNEE_COPRO[FOURNISSEUR CHAUFFAGE] dans la ListBox4
DONNEE_COPRO[NUM CHAUFFAGE] dans la ListBox5
DONNEE_COPRO[FOURNISSEUR ASCENSEUR] dans la ListBox6
DONNEE_COPRO[ID ASCENSEUR] dans la ListBox7
DONNEE_COPRO[FOURNISSEUR AUTRES] dans la ListBox8
DONNEE_COPRO[ID AUTRES] dans la ListBox9

mais je n'y arrive pas... Je débute encore en VBA

MERCI de votre aide !
 

Pièces jointes

Ah! office 365...
1) Télécharcher le fichier MSCOMCTL.OCX ici par exemple.
2) Extraire le fichier dans un nouveau dossier sur le bureau (ou ailleurs)
3) Couper et collez-le dans C:\Windows\System32
4) Menu démarrer -> Click-droit sur "Invité de commande" -> "Exécuter en tant qu'administrateur"
5) Dans la fenêtre noire, saisissez cd c:\windows\system32 puis Enter
6) Puis saisissez regsvr32 mscomctl.ocx puis Enter
Ici petit message comme quoi c'est réussi...
7) Petit redémarrage du pc

A+ François
 
- 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

Discussions similaires

Réponses
1
Affichages
367
Réponses
8
Affichages
479
Retour