Userform avec Listview

[duplaly]

Bonjour tout le monde
J'essaye d'adapter ce fichier à mon projet mais je suis bloqué. J'ai besoin d'aide pour finaliser.
Lorsque je veux ajouter un employé, les données sont enregistrées dans mon tableau mais ne s'affiche pas automatiquement dans le Listview. Je suis obligé de fermer l'userform et réouvrir.
Mon bouton modifier ne fonctionne pas non plus car je ne sais pas quoi mettre comme code vba.
je joins mon fichier si quelqu'un veut le regarder.
Merci

 

[Bebere]

Re : Userform avec Listview

Bonjour Duplaly
attention aux données confidentielles
changements effectués
à bientôt

 

[Habitude]

Re : Userform avec Listview

Bonjour

je vois souvent ce code

.ListItems.Add , , Tbl(l, 1)
    For c = 2 To UBound(Tbl, 2)
    .ListItems(.ListItems.Count).ListSubItems.Add , , Tbl(l, c)
    Next

avec utilisation du .ListItems(.ListItems.Count)
Ce qui crée un déplacement dans la liste à chaque ajout d'un subItem


Qui n'est pas très efficace lorsqu'il beaucoup de lignes sur plusieurs colonne.

La fonction Add retourne un pointeur sur l'objet listitem
Suffit d'enregistrer ce pointeur.

dim pt as ListItem
Set pt= .ListItems.Add(, , Tbl(l, 1))
    For c = 2 To UBound(Tbl, 2)
    pt.ListSubItems.Add , , Tbl(l, c)
    Next

 

[duplaly]

Re : Userform avec Listview

Merci beaucoup