Problème de Listbox
Résolu
DGVDR
Messages postés
164
Statut
Membre
-
DGVDR Messages postés 164 Statut Membre -
DGVDR Messages postés 164 Statut Membre -
Bonjour,
Je sollicite votre aide pour un soucis de Listbox
Vous trouverez ci-joint mon fichier de travail : https://www.cjoint.com/?0KtqWUNmyLl
Commencer par aller dans "Visuel" dans l'encadré fournisseur sur la page d'accueil.
Apparait un Userform
Ma listbox du bas (Contact), ne fonctionne pas totalement puisqu'elle ne m'affiche pas l'information du téléphone sensée être dans la 4eme colonne de la listbox.
Information se trouvant dans la 10eme colonne de l'onglet "Contacts".
Le mot de passe de mon code est "unzo"
Merci de votre aide,
DGVDR
Je sollicite votre aide pour un soucis de Listbox
Vous trouverez ci-joint mon fichier de travail : https://www.cjoint.com/?0KtqWUNmyLl
Commencer par aller dans "Visuel" dans l'encadré fournisseur sur la page d'accueil.
Apparait un Userform
Ma listbox du bas (Contact), ne fonctionne pas totalement puisqu'elle ne m'affiche pas l'information du téléphone sensée être dans la 4eme colonne de la listbox.
Information se trouvant dans la 10eme colonne de l'onglet "Contacts".
Le mot de passe de mon code est "unzo"
Merci de votre aide,
DGVDR
A voir également:
- Problème de Listbox
- Trié un listBox ✓ - Forum Programmation
- Rafraichir une listbox c# - Forum C#
- ListBox a 2 colonnes ✓ - Forum Excel
- Listbox a choix multiples - Forum VB / VBA
- [VBA] remplir une listBox ✓ - Forum VB / VBA
2 réponses
Bonjour,
pas facile d'aligner les infos avec une listbox, des labels iraient mieux
With Sheets("Contacts")
Listboxcontact.AddItem .Cells(i, 7) 'nom
Listboxcontact.List(Listboxcontact.ListCount - 1, 1) = .Cells(i, 8) ' fonction
Listboxcontact.List(Listboxcontact.ListCount - 1, 2) = .Cells(i, 9) '@mail
Listboxcontact.List(Listboxcontact.ListCount - 1, 3) = .Cells(i, 10) 'Tel
End With
pas facile d'aligner les infos avec une listbox, des labels iraient mieux