List box
ninie95130
-
aquarelle Messages postés 7181 Date d'inscription Statut Modérateur Dernière intervention -
aquarelle Messages postés 7181 Date d'inscription Statut Modérateur Dernière intervention -
Bonjour,
Je débute dans VBA, je viens juste d'avoir ma formation.
J'essaye de faire une chose surement toute simple pour vous, mais moi ça fait deux jours que je planche.
j'ai fabriqué un formulaire dans le quel j'ai mis une listbox, j'aimerais faire apparaitre dans cette listbox la colonne F de mon fichier source.
J'ai tapé :
Private Sub F_client_Click()
F_client.RowSource = Range("f1").End(xlDown).Address
End Sub
et bien sur ça ne marche pas.
Merci d'avance à tous de votre aide.
Je débute dans VBA, je viens juste d'avoir ma formation.
J'essaye de faire une chose surement toute simple pour vous, mais moi ça fait deux jours que je planche.
j'ai fabriqué un formulaire dans le quel j'ai mis une listbox, j'aimerais faire apparaitre dans cette listbox la colonne F de mon fichier source.
J'ai tapé :
Private Sub F_client_Click()
F_client.RowSource = Range("f1").End(xlDown).Address
End Sub
et bien sur ça ne marche pas.
Merci d'avance à tous de votre aide.
A voir également:
- List box
- List disk - Guide
- Directory list & print - Télécharger - Divers Utilitaires
- Adresse ip box - Guide
- Tera box - Télécharger - Stockage
- Box allumé mais pas internet - Guide
1 réponse
Bonsoir,
Il faut mettre ce code dans le code de la UserForm :
Ensuite pour appeler la UserForm, il faut mettre ce code dans un module :
Voilà j'espère que cela t'aidera.
Bonne soirée
Il faut mettre ce code dans le code de la UserForm :
Private Sub UserForm_Initialize()
Dim DerCell As String
DerCell = Range("F1").End(xlDown).Address
ListBox1.RowSource = "F1:" & DerCell
End Sub
Ensuite pour appeler la UserForm, il faut mettre ce code dans un module :
Sub RechercheList()
Load UserForm1
UserForm1.Show
End Sub
Voilà j'espère que cela t'aidera.
Bonne soirée
