Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Listbox: source = données filtrés

Créer une discussion
  • Initiateur de la discussion Initiateur de la discussion mirooz
  • 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 !

S'inscrire
M

mirooz

XLDnaute Nouveau
Bonsoir le forum, c'est avec plaisir que je reviens vers vous pour de nouvelles questions 😉

Voici ci-joint une version très simplifiée d'un gestionnaire de devis facturation que je suis entrain de créer.
J'y ai laissé un userform destiné à sélectionner un client ou un prospect dans une liste et afficher les devis affectés à cette personne.

Le cheminement est le suivant:
- une zone de texte permet de sélectionner un demandeur (prospect ou client) avec des suggestions de résultat dans une liste déroulante.
- Un filtre est appliqué dans la base de données contenant les devis pour conserver uniquement les devis associés au client choisi.
- Une zone contenant les numéros de devis est déterminée et servira de source pour la listbox.

Le problème est que le filtre ne fait que masquer les lignes et vu que les enregistrement de devis pour un client ne sont pas tous adjacents, il y a des devis appartenant à d'autres clients qui apparaissent dans la liste avant, après ou entre les devis souhaités.

Ce n'est peut être pas évident à comprendre mais le fichier exemple parlera de lui même. Testez une recherche sur le nom "Martin" vous verrez de quoi il s'agit.

Merci d'avance pour vos conseils 🙂
 

Pièces jointes

Trier par date Trier par votes
Re : Listbox: source = données filtrés

Bonsoir Mirooz,

une solution, regarde si cela te convient

Code: 
'Définition de la liste de devis
'Set Liste_devis = Sheets("bdd_devis").Range(ActiveCell, ActiveSheet.Range("B65536").End(xlUp))
If ActiveCell.Value = "" Then
Exit Sub
Else
With Sheets("bdd_devis")
For Each D In .Range("B3:B" & .Range("B65536").End(xlUp).Row)
Select Case D.EntireRow.Hidden
Case Is = False
ComboBox1.AddItem D
End Select
Next
End With
End If
'Liste_devis.Select
End Sub

Bonne soirée
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- 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

V
  • Question Question
Autres Importer des données avec condition depuis l'onglet source
Réponses
4
Affichages
518
vdudu
V
M
  • Question Question
XL 2010 Colorie certaines lettres en bleu dans la ListBox 1
Réponses
1
Affichages
457
job75
C
  • Résolu(e)
XL 2021 Remplir données devis en vba avec descriptions/quantités/PUs alignés
2
Réponses
18
Affichages
1 K
Phil69970
  • Résolu(e)
XL 2021 PB Alimentation Tableau structuré depuis un ListBox
2
Réponses
27
Affichages
772
jeff1494
P
  • Résolu(e)
XL 2010 Recuperer données listbox
Réponses
3
Affichages
567
Staple1600
V
  • Question Question
Microsoft 365 VBA - Filtre avancé avec TCD
2
Réponses
16
Affichages
915
nat54
M
  • Question Question
XL 2010 Listbox
Réponses
10
Affichages
592
Mody200
M
C
  • Résolu(e)
formulaire de saisie
2 3
Réponses
41
Affichages
3 K
Caso
C
  • Résolu(e)
Microsoft 365 Vba : Transférer des données d'un tableau dans un autre fichier
Réponses
7
Affichages
753
Chaton77
  • Question Question
XL 2021 Atteindre l'onglet du Client au clic sur son nom dans ma ListBox
2 3
Réponses
44
Affichages
3 K
Dudu2
zip And unzip des éléments d'un fichier de type zip y compris les fichiers Excelavec la commande (TAR)
Réponses
2
Affichages
457
patricktoulon
N
  • Question Question
XL 2021 UserForm, ListBox et TextBox
Réponses
6
Affichages
523
nano33320
N
A
  • Résolu(e)
XL 2016 Alimentation d'un fichier selon données sélectionnées via une ComboBox
Réponses
3
Affichages
639
Aldonanou
A
R
  • Question Question
XL 2021 Filtres améliorés sur Excel
Réponses
7
Affichages
639
Cousinhub
J
  • Question Question
XL 2021 reporter des données entre plusieurs feuilles sans décalage de lignes dans les tableaux
Réponses
4
Affichages
782
job75
J
  • Question Question
XL 2016 Affichage onglets d'un classeur dans la listbox d'un userform
Réponses
2
Affichages
810
jeff2318
J
  • Résolu(e)
XL 2019 Organiser les données dans listbox
Réponses
2
Affichages
1 K
Messan
J
  • Question Question
Microsoft 365 macro qui ouvre des fichiers excel de type "analyze in excel" généré par power bi et met à jour un filtre "mois" sur plusieurs tcd
Réponses
0
Affichages
570
JJ69
J
POWERQUERY :: Combiner les onglets d'un classeur Excel ou certains au cas par cas
Réponses
0
Affichages
329
oguruma
EXCEL :: Effectuer des regroupements avec agrégations de données :: GROUPER.PAR
Réponses
1
Affichages
513
oguruma
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…