Charger une ListBox avec Données de deux Feuil

MuscatMimi

XLDnaute Accro
Bonsoir

je cherche désespérémnent de charger une Listbox, dans un Usf
avec des Données située sur Deux Feuil

et bé je n'y suis pas arrivé,

Cordialement
 

Banzai64

XLDnaute Accro
Re : Charger une ListBox avec Données de deux Feuil

Bonsoir

testé sur 2003

Juste un essai (largement perfectible)

Code:
Private Sub UserForm_Initialize()
Dim Lg As Long
  Lg = 1
  With Feuil1
    While .Cells(Lg, 1) <> ""
      Me.ListBox1.AddItem .Cells(Lg, 1)
      Lg = Lg + 1
    Wend
  End With
  Lg = 1
  With Feuil2
    While .Cells(Lg, 1) <> ""
      Me.ListBox1.AddItem .Cells(Lg, 1)
      Lg = Lg + 1
    Wend
  End With
End Sub
 

Staple1600

XLDnaute Barbatruc
Re : Charger une ListBox avec Données de deux Feuil

Bonsoir tout le monde


Et les mauvaises habitudes se gardent chez vaucluseimmo :rolleyes:
(depuis longtemps déjà ...)

EDITION: Ok ( Méat culpa ; ) ) : J'ai supprimé le lien vers le fil
mais je laisse mon couplet sur tes mauvaises habitudes puisque tu le valides toi-même ;)
 
Dernière édition:

Statistiques des forums

Discussions
312 305
Messages
2 087 084
Membres
103 459
dernier inscrit
Arnocal