Empêcher une sélection sur un UserForm
Fermé
andy2092
Messages postés
78
Date d'inscription
dimanche 13 mai 2018
Statut
Membre
Dernière intervention
7 février 2024
-
21 juin 2018 à 09:16
cs_Le Pivert Messages postés 7904 Date d'inscription jeudi 13 septembre 2007 Statut Contributeur Dernière intervention 14 août 2024 - 21 juin 2018 à 11:07
cs_Le Pivert Messages postés 7904 Date d'inscription jeudi 13 septembre 2007 Statut Contributeur Dernière intervention 14 août 2024 - 21 juin 2018 à 11:07
A voir également:
- Empêcher une sélection sur un UserForm
- Empecher adobe de se connecter à internet - Forum Windows
- Un bloqueur de publicité empêche la lecture. veuillez le désactiver pour démarrer la vidéo. ✓ - Forum Mozilla Firefox
- L'indice n'appartient pas à la sélection vba ✓ - Forum VB / VBA
- Erreur '9' l'indice n'appartient pas à la sélection - Forum VB / VBA
- Excel empêcher modification cellule - Guide
2 réponses
thev
Messages postés
1925
Date d'inscription
lundi 7 avril 2008
Statut
Membre
Dernière intervention
18 décembre 2024
692
21 juin 2018 à 11:03
21 juin 2018 à 11:03
Tout dépend de la manière dont vous avez paramétré l'affichage de la plage dans votre ListBox.
Vous devez d'abord redéfinir votre plage sans la ligne d'entête.
Si c'est via la propriété "RowSource", il vous suffit d'activer la propriété "ColumnHeads"
Si c'est via la propriété "List", vous devez créer une ligne d'entête dans votre UserForm avec un contrôle de type Label
Vous devez d'abord redéfinir votre plage sans la ligne d'entête.
Si c'est via la propriété "RowSource", il vous suffit d'activer la propriété "ColumnHeads"
Si c'est via la propriété "List", vous devez créer une ligne d'entête dans votre UserForm avec un contrôle de type Label
cs_Le Pivert
Messages postés
7904
Date d'inscription
jeudi 13 septembre 2007
Statut
Contributeur
Dernière intervention
14 août 2024
729
21 juin 2018 à 11:07
21 juin 2018 à 11:07
Bonjour,
Voir ceci
https://silkyroad.developpez.com/VBA/ControlesUserForm/#LII-G
Voir ceci
https://silkyroad.developpez.com/VBA/ControlesUserForm/#LII-G
Private Sub ListBox1_Click() If ListBox1.ListIndex = 0 Then Exit Sub MsgBox ListBox1.List(ListBox1.ListIndex) End Sub