VBA - Lier 2 codes ensemble - Code de recherche avec un code d'adaptation d'affichage

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 !

JONEY76

XLDnaute Occasionnel
Bonsoir,

Voici le sujet :

J'ai un fichier dans lequel je réalise des recherches dans une base de données.
Dans les listbox, j'ai rencontré de nombreux problèmes d'affichage suivant le nombre de colonnes

Partie 1
1 textbox pour saisir la recherche et un bouton
Affichage dans une listbox

Partie 2:
Code qui affiche toute la base dans une listbox en adaptant les largeurs de colonnes et peut afficher plus de 30 colonnes


Le but:
- Lier les deux codes pour que les résultats des recherches s'adaptent dans la listbox
- Un problème est récurent sur la recherche, j'ai mis une gestion d'erreur mais je ne trouve pas la faille

Merci d'avance !
 

Pièces jointes

Re : VBA - Lier 2 codes ensemble - Code de recherche avec un code d'adaptation d'affi

Bonsoir PierreJean,

En tout cas, merci pour le temps passé !! Mes excuses à Madame pour vous accaparer sur les problèmes de ces satanés tableurs mais c'est pour la bonne cause!
Je viens de procéder à un essai, juste en notant colonne 1, il me trouve 8 lignes ... bizarre non ?
 
Re : VBA - Lier 2 codes ensemble - Code de recherche avec un code d'adaptation d'affi

Re,

J'ai noté des commentaire pour"traduire" en français le code, cela m'aide à comprendre

Dans le code, il y a tellement de variables et d'abréviation qu'il est difficile de s'y retrouver

Il y a au centre du code "on error resume next". Serait il possible de le supprimer?
 

Pièces jointes

Re : VBA - Lier 2 codes ensemble - Code de recherche avec un code d'adaptation d'affi

Re

Voici avec le code commenté
J'ai également mis un msgbox qui t'affichera les adresses du résultat de la recherche pour que tu comprennes pourquoi il y a tant de lignes quand tu cherches colonne1
 

Pièces jointes

- 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
32
Affichages
337
  • Question Question
Microsoft 365 Code VBA
Réponses
7
Affichages
644
Retour