Filtre avec optionbutton & Listbox

BOISGONTIER

XLDnaute Barbatruc

Repose en paix

• 3 Février 2018

• #2

Bonjour,

Exemple avec option dans ComboBox.

JB

 

Pièces jointes

• FormRechercheModifAjoutSup3Option.xls

  189.5 KB · Affichages: 72

Vote positif 0 Vote négatif

V

vmax67

XLDnaute Occasionnel

• 4 Février 2018

• #3

Bonjour

merci pour votre réponse, mais dans mon cas cela ne fonctionnera pas. Votre fichier filtre sur une seule colonne (Pays), alors que mes optionbutton filtre chacun une colonne bien distincte (X).
Vmax

 

Vote positif 0 Vote négatif

BOISGONTIER

XLDnaute Barbatruc

Repose en paix

• 4 Février 2018

• #4

Cf PJ

JB

 

Pièces jointes

• FormRechercheModifAjoutSup3Option2.xls

  193.5 KB · Affichages: 87

Vote positif 0 Vote négatif

V

vmax67

XLDnaute Occasionnel

• 5 Février 2018

• #5

Bonsoir

c'est parfait

VMAX

 

Vote positif 0 Vote négatif

V

vmax67

XLDnaute Occasionnel

• 15 Février 2018

• #6

Bonjour JB

comment faire pour que le combobox1 trie les données.

Par avance merci.

Vmax

 

Vote positif 0 Vote négatif

BOISGONTIER

XLDnaute Barbatruc

Repose en paix

• 16 Février 2018

• #7

Bonjour,

http://boisgontierjacques.free.fr/fichiers/Formulaire/FormRechercheModifAjoutSup3Option.xls

Code:

'-- combobox option
  Me.LabelOption.Caption = f.Cells(Decal, colOption)
  Set d = CreateObject("scripting.dictionary")
  d("*") = ""
  For i = LBound(BD) To UBound(BD)
    d(BD(i, colOption)) = ""
  Next i
  temp = d.keys
  TriS temp, LBound(temp), UBound(temp)
  Me.ComboBox1.List = temp
  Me.ComboBox1 = "*"
  gChoix

JB

 

Dernière édition: 16 Février 2018

Vote positif 0 Vote négatif

V

vmax67

XLDnaute Occasionnel

• 17 Février 2018

• #8

Bonjour JB

Merci, toujours aussi efficace.

Vmax

 

Vote positif 0 Vote négatif