Excel 2003 - Filtrer une ComboBox

[invite708813dc]

Bonjour le forum,

J'aimerais filtrer une ComboBox (dans un UserForm) en fonction des choix opérés dans deux OptionButton. Mon problème est que je ne sais pas écrire le code nécessaire.

Vous trouverez, dans la PJ, un extrait de mon projet avec plus d'explications.

Pourriez-vous m'aider? Merci d'avance.
-----

[invite8666d089]

Juste une petite remarque ; pour développer ta macro, il serait préférable que ne s'affichent pas les mêmes choses si on clique sur l'option "devis" ou sur "facture". Pour les besoins du développement, tu aurais pu mettre dans ton tableau les clients en minuscules pour les devis et en majuscules pour les factures.

Voici quelques modifs dans ta routine Ini qui trient correctement :

Private Sub OptionButtonDevis_Click()
  Call Ini("DEVIS")
End Sub


Private Sub OptionButtonFacture_Click()
  Call Ini("FACTURE")
End Sub

Private Sub Ini(choix As String)
  Dim L As Integer

  ComboBoxNom.Clear
  For L = 7 To 12
    If Range("B" & L) = choix Then ComboBoxNom.AddItem Range("C" & L)
  Next L
End Sub

Tu noteras que je n'ai pris en compte que la plage B7..B12 pour que les choses soient plus claires pour toi.

On peut trier très facilement une Combobox (ou ListBox) dans l'ordre alphabétique et sans doublon, avec un simple tri à bulle, mais là je préfère te laisser le plaisir de te faire les ongles, sinon tu n'apprendrais rien. Allez, bonne continuation.

[invite708813dc]

Salut le forum, Dormeur74,

Je te remercie pour ce code que j'arrive à comprendre sans trop de difficulté.
Cependant, pourrais-tu m'expliquer quelle est la valeur de <choix> dans la boucle For? Il s'agit d'une variante?

Pour le tri, je verrais plus tard et, le cas échéant, reviendrais sur le forum.

Merci encore.

[invite8666d089]

Cependant, pourrais-tu m'expliquer quelle est la valeur de <choix> dans la boucle For? Il s'agit d'une variante?

Quand on clique sur l'option "Devis", on passe la chaîne de caractères "DEVIS" à la procédure Ini(choix). La variable "choix" reçoit cette valeur, ce qui permet ensuite de trier les lignes et de charger la combo.

[A voir en vidéo sur Futura]

[invite708813dc]

Ben oui... je n'avais pas fait attention à la déclaration, c'était évident.
Merci beaucoup et bonne journée.