Alimenter combobox selon condition

boby63

XLDnaute Nouveau
Bonjour
J'aimerai pouvoir exclure de la combo dans le fichier ci-joint, les valeurs en jaune car la date est dépassée (colonne 4)

Autre exercice mais ressemblant :
Remplaçons les dates en colonne par des valeurs VRAI ou FAUX. J'aimerai aussi savoir exclure de la combo les valeurs "FAUX" par exemple.

Merci d'avance et bonne soirée
 

Pièces jointes

  • Combo date butoir.xlsm
    19.6 KB · Affichages: 36

Roland_M

XLDnaute Barbatruc
bonsoir,

vite fais comme ça, essayer ceci pour l'alimentation de la combo
Code:
Private Sub UserForm_Initialize()
Dim Plage As Range, R As Range
With Sheets("Feuil1")
Set Plage = .Range("A2:A" & .Range("A65536").End(xlUp).Row)
End With
For Each R In Plage
If R.Interior.ColorIndex = xlColorIndexNone Then ComboBox1.AddItem R
Next
End Sub
 

Lone-wolf

XLDnaute Barbatruc
Bonjour boby

Ton fichier en retour. Seule l'année 2017 est prise en compte dans la combo. J'ai ajouté un colonne et une combo avec les valeurs VRAI et FAUX pour filter celles-ci.

EDIT: Bonjour Roland.
 

Pièces jointes

  • Combo date butoir.xlsm
    26 KB · Affichages: 44
Dernière édition:

Discussions similaires

Statistiques des forums

Discussions
312 841
Messages
2 092 711
Membres
105 517
dernier inscrit
Freddy93