Sortir une liste dans un Listbox

jmh · 12 Juillet 2005

Salut le forum,

Voila mon problème, je voudrais récupérer une liste de nom qui se trouve dans la colonne A de mon fichier vers un listbox.

jusque la ça va, mais le problème c'est que pour chaque nom de ma colonne , j'ai une variable oui/non dans la colonne B

Donc je voudrais uniquement récupérer les noms qui ont la variable oui vers mon listbox.

J'espère avoir été assez clair et je vous remercie pour les réponses.

_Thierry · 12 Juillet 2005

Bonsoir Jmh, le Forum

Voici une solution,

Option Explicit
Option Compare Text

Private Sub UserForm_Initialize()
Dim i As Integer
Dim Plage As Variant

With Sheets('Feuil1')
    Plage = .Range('A2:B' & .Range('B5000').End(xlUp).Row)
End With

For i = 1 To UBound(Plage)

If Plage(i, 2) = 'OUI' Then
    Me.ListBox1.AddItem Plage(i, 1)
End If
Next

End Sub

Bonne Soirée
@+Thierry

jmh · 12 Juillet 2005

salut @+Thierry

je te remercie pour ta solution, c'est exactement ce que je voulais.

Bonne soirée

Sortir une liste dans un Listbox

jmh

Guest

_Thierry

XLDnaute Barbatruc

jmh

Guest

Discussions similaires