Programmer listview userform
Résolu/Fermé
coraliie.c
coraliie.c
- Messages postés
- 22
- Date d'inscription
- jeudi 27 novembre 2014
- Statut
- Membre
- Dernière intervention
- 9 décembre 2014
coraliie.c
- Messages postés
- 22
- Date d'inscription
- jeudi 27 novembre 2014
- Statut
- Membre
- Dernière intervention
- 9 décembre 2014
A voir également:
- Listview vba
- Vba listview - Meilleures réponses
- Listview vba excel exemples - Meilleures réponses
- Listview vba excel exemples ✓ - Forum - Excel
- Listview, VBA, Excel ✓ - Forum - Excel
- Emplir Listview VBA excel ✓ - Forum - Excel
- Créer une ListView vba ✓ - Forum - VB / VBA
- VBA excel Listview afficher grace a une combobox plusieur partie d'une feuille ✓ - Forum - VB / VBA
3 réponses
cs_Le Pivert
9 déc. 2014 à 09:26
- Messages postés
- 7745
- Date d'inscription
- jeudi 13 septembre 2007
- Statut
- Contributeur
- Dernière intervention
- 20 mai 2022
9 déc. 2014 à 09:26
voici le code:
Private Sub UserForm_Initialize() 'Exemple 1 : Comment alimenter un Listview ' Initialisation du listview With ListView1 With .ColumnHeaders ' Vider le listview .Clear 'Ajouter les colonnes .Add , , "Nom", 80 .Add , , "Prénom", 80 .Add , , "Habilitation", 80 .Add , , "Prochain Recyclage", 80 End With .View = 3 ' type Report .Gridlines = True ' affichage de lignes .FullRowSelect = True ' sélection complète de la ligne .HideColumnHeaders = False ' afficher les en-têtes de colonnes .LabelEdit = 1 ' ne pas autoriser la saisie End With IniListview End Sub Private Sub IniListview() With Worksheets("Année") derl = .Range("A65536").End(xlUp).Row Tbl = .Range("A1:D" & derl) End With With ListView1 For L = 1 To UBound(Tbl, 1) .ListItems.Add , , Tbl(L, 1) For c = 2 To UBound(Tbl, 2) .ListItems(.ListItems.Count).ListSubItems.Add , , Tbl(L, c) Next Next End With End Sub
cs_Le Pivert
8 déc. 2014 à 15:33
- Messages postés
- 7745
- Date d'inscription
- jeudi 13 septembre 2007
- Statut
- Contributeur
- Dernière intervention
- 20 mai 2022
8 déc. 2014 à 15:33
Bonjour,
Voir ceci pour plus de détails:
https://silkyroad.developpez.com/VBA/ListView/
Voir ceci pour plus de détails:
https://silkyroad.developpez.com/VBA/ListView/
Bonjour
Donne au moins un model pour voir ce que tu as fait
Maurice
Donne au moins un model pour voir ce que tu as fait
Maurice
coraliie.c
9 déc. 2014 à 08:30
- Messages postés
- 22
- Date d'inscription
- jeudi 27 novembre 2014
- Statut
- Membre
- Dernière intervention
- 9 décembre 2014
9 déc. 2014 à 08:30
Bonjour Maurice
Voici mon fichier :
https://www.cjoint.com/?DLjiKQaZaQm
J'ai essayé de commencé à programmer l'userform2 mais j'avoue que je galère !
Voici mon fichier :
https://www.cjoint.com/?DLjiKQaZaQm
J'ai essayé de commencé à programmer l'userform2 mais j'avoue que je galère !
9 déc. 2014 à 09:28
Remplacé clients par année et les colonnes "A1:D" & derl
Bon courage
9 déc. 2014 à 09:40
C'est exactement ce qu'il me fallait.