Remplir listbox et recherche avec critère

bonjour

J'aimerais de l'aide sur le sujet suivant.

J'ai un tableau excel (LISTE_CLIENTS) contenant des champs A 13 COL

J' essaie de Remplir listbox et recherche avec critère

mais je ne sais pas comment ?

voir fichier joint

merci de votre aide

173listbox-v001.xlsm (28.14 Ko)

Bonsoir,

A ta place je rajouterai une colonne avec numero d'ordre.

La listbox ou le combobox prend alors la valeur de cette colonne et renvoie la ligne correspondante.

Bonjour

comment je ne comprend pas se que tu veux dire?

merci

si par exemple tu cherches le nom d'un client : dans listbox fait un double clic gche sur la ligne qui t'interresse.

Je ne sais pas ce que tu cherches (nom ? num facture ?...) ni ou tu veux que la reponse se pose.

Par défaut je cherche le nom client et le renvoie dans un msgbox.

A adapter selon le cas.

352listbox-v001.xlsm (28.26 Ko)

Bonjour

tu peux augmanter le nombre de colonne (13 Colonnes)

merci de votre aide

dans le code :

Private Sub UserForm_Initialize()

'Me.OptionButton1 = True

With Me.ListBox1

.BoundColumn = 1

.ColumnCount =11 ' nombre de colonnes à afficher : mettre 13

.ColumnWidths = "0;15;40;80;80;100;100;60;70;60" ' largeur à afficher : 0 pour le num d'ordre, rajouter les largeurs voulues pour les dernières

End With

Recherche

End Sub

Bonjour

rien ne ce passe les huit (8 colonne ) reste fixe

tu peux faire un test

merci

Un peu d'adaptation... Il vaut mieux définir les propriètés de lisbox directement sur vba.

C'est mieux ?

Qu'est-ce que tu veux obtenir au final ?

149listbox-v001.xlsm (31.73 Ko)

Bonjour

Private Sub UserForm_Initialize()
Set F = ThisWorkbook.Worksheets("Base")
Set rng = F.Range("A1").CurrentRegion
With rng
    Set rng = .Offset(1).Resize(.Rows.Count - 1)    ' Redimensionnement de la plage des données pour ne pas prendre en compte la première ligne
End With

With Me.ListBox1
    .List = rng.Value
    .ColumnCount = 13   ' Nombre de colonnes à afficher
    .ColumnWidths = "50;60;50;80;80;80;50;50;60;60;80;120;80"    ' Largeur des colonnes à affciher si 0 = invisible
End With
End Sub

pour remplir la listbox


Bonjour

dernier fichier que tu m'envoyer fais un bug

merci de votre aide

Désolé, je suis allé fermer les yeux...

On efface tout et on recommence.

Celui là fonctionne, mais je ne sais tjrs pas ce que tu veux obtenir.

365listbox-v001.xlsm (27.12 Ko)

bonjour

ok en RAZ

Mnt tu as remplis listbox ok ca marche

tu peux ajouter textbox pour la recherche dans la colonne B (colonne 2)

merci

J'ai remplacé le message par 2 textbox avec nom et qualif

127listbox-v001.xlsm (27.97 Ko)

Bonjour

je pense que tu ne comprend pas ma question

j'essaie de faire un textbox pour filtrer listbox

merci

Bonjour à toute la communauté,

Je viens vers vous pour un petit coup de pouce.

J'ai un form independant contenant une TextBox et une ListBox.

Le but de ce form :

- saisir dans la TextBox quelques lettres et réduire la liste des

valeurs dans la ListBox.

MERCI DE VOTRE AIDE

Bonjour

Je viens vers vous pour un petit coup de pouce.

Comment afficher le temp d'une cellule a listbox

parceque il m'affiche le temp en nombre

merci de votre aide

208listbox-v004.xlsm (27.97 Ko)
Rechercher des sujets similaires à "remplir listbox recherche critere"