matheus595959
Messages postés92Date d'inscriptionmardi 3 avril 2007StatutMembreDernière intervention 4 août 2008
-
4 août 2008 à 14:26
dedenet2
Messages postés372Date d'inscriptionvendredi 27 juillet 2007StatutMembreDernière intervention22 juillet 2013
-
17 août 2008 à 13:41
Voila je pense que mon problème est assez simple.
Dans ma feuille excel 1 j'ai des noms de familles que je souhaite récuperer dans une listbox.
J'ai donc créer un userform contenant la listbox ainsi qu'un bouton de commande.
Le bouton de commande doit me permettre d'afficher les noms de familles situés dans la colonne A (a partir de A3) lorsque je clic dessus
Merci
Si vous voulez plus de renseignement ou bien voir le code créer y'a pas de problême
dedenet2
Messages postés372Date d'inscriptionvendredi 27 juillet 2007StatutMembreDernière intervention22 juillet 20132 17 août 2008 à 13:41
Bonjour matheus595959
C'est bien expliqué
Voici un petit code a coller dans un userform
N'oublie pas de nommer le bouton et le listbox à l'identique du code
En cliquant sur le bouton , tu vas remplir le listbox a partir de la
cellule "A3".Il faut s'assurer qu'il n'y pas de cellule vide entre le
premier nom de fanille et le dernier de la liste.Ceci pour éviter des
vides dans le listbox.
-----------------------------------------------------------------------
Private Sub CmdRemplirLisbox_Click()
'Appel le module
Call RemplirListBox
End Sub
Sub RemplirListBox()
Dim CelluleHautduTableau As String
Dim CelluleBasduTableau As String
CelluleHautduTableau = "A3"
'Recherche la cellule la plus basse du tableau
CelluleBasduTableau = "A" & Feuil1.Range("a65536").End(xlUp).Row
'Charge le listbox