Cacher un indice dans une combobox

[ssassam]

Bonjour tout le monde,

Svp j'ai une combobox2 qui affiche la liste des N° client d'une feuil Excel.

j'ai certain N° de client qui contiens le mot ANNL (Exp:12452.ANNL)

Svp comment ne pas afficher tout les N° cui contien le mot.ANNL

Merci beaucoup

 

[Pierrot93]

Re : Cacher un indice dans une combobox

Bonjour,

A voir comment ta combo est alimentée.... utilise la méthode "AddItem" en effectuant un test à l'aide de l'opérateur "like", exemple ci-dessous à adapter à ton projet :

If Not Cells(1, 1) Like "*ANNL*" Then ListBox1.AddItem

bonne journée
@+

 

[ssassam]

Re : Cacher un indice dans une combobox

Merci Pierrot93

Voila comment est alimenté mon code:

With Sheets("xxxx")

For i = 2 To .Range("a65536").End(xlUp).Row
ComboBox1.AddItem
ComboBox1.List(ComboBox1.ListCount - 1, 0) = .Cells(i, 4)
ComboBox1.List(ComboBox1.ListCount - 1, 1) = i
Next i


Stp comment j’intègre ta proposition a mon code

 

[Pierrot93]

Re : Cacher un indice dans une combobox

Re,

insère le test dans ta boucle :

For i = 2 To .Range("a65536").End(xlUp).Row
    If .Cells(i, 4) Like "*ANNL*" Then
        ComboBox1.AddItem
        ComboBox1.List(ComboBox1.ListCount - 1, 0) = .Cells(i, 4)
        ComboBox1.List(ComboBox1.ListCount - 1, 1) = i
    End If
Next i

 

[ssassam]

Re : Cacher un indice dans une combobox

hhhhhhh ça marche mas a l'inverse , il me laisse les N° de client qui contien ANNUL je cherche le contraire

Merci

 

[Pierrot93]

Re : Cacher un indice dans une combobox

Re,

Aarf, autant pour moi j'ai oublié le "Not" :

If Not .Cells(i, 4) Like "*ANNL*" Then

 

[ssassam]

Re : Cacher un indice dans une combobox

Mr.Pierrot >>> F A N T A S T I Q U E <<<

Merci beaucoup ça marche a merveille.