Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

XL 2016 Parametrer ListView

KTM

XLDnaute Impliqué
Bonjour Cher Forum
J'ai concu un userform contenant une ListView que j'ai essayé de paramétrer .
Mais je n'arrive pas à Lancer mon userform .
Je pense que mon code fonctionne mal.
Pouvez vous me guider ?
Merci.
 

Pièces jointes

  • listview.xlsm
    176 KB · Affichages: 8

CHALET53

XLDnaute Barbatruc
Remplace ton code par celui-ci :

Sub ActualisationListView()
Dim Item As ListItem
Dim dl, i As Integer
listview.ListView1.ListItems.Clear
dl = Sheets("Grille_de_Dispensation").Cells(Rows.Count, 1).End(xlUp).Row
For i = 2 To dl
Set Item = listview.ListView1.ListItems.Add(Text:=Sheets("Grille_de_Dispensation").Cells(i, 1))
Item.SubItems(1) = Sheets("Grille_de_Dispensation").Cells(i, 2)
Item.SubItems(2) = Sheets("Grille_de_Dispensation").Cells(i, 3)
Item.SubItems(3) = Sheets("Grille_de_Dispensation").Cells(i, 4)
Item.SubItems(4) = Sheets("Grille_de_Dispensation").Cells(i, 5)
Item.SubItems(5) = Sheets("Grille_de_Dispensation").Cells(i, 6)
Item.SubItems(6) = Sheets("Grille_de_Dispensation").Cells(i, 7)
Item.SubItems(7) = Sheets("Grille_de_Dispensation").Cells(i, 8)
Item.SubItems(8) = Sheets("Grille_de_Dispensation").Cells(i, 9)
Item.SubItems(9) = Sheets("Grille_de_Dispensation").Cells(i, 10)
'Item.SubItems(10) = Sheets("Grille_de_Dispensation").Cells(i, 10)
Next i
End Sub


a+
 

KTM

XLDnaute Impliqué
Merci pour la correction
Mais un autre soucis
1- J'aimerais afficher dans mes combobox les informations de la ligne sélectionnée de la listview et là aussi mon code coince
2- J'aimerais aussi pouvoir afficher le résultat d'une recherche d'un code quelconque et faire des modifications dans la base.
Merci pour tout
 

Pièces jointes

  • listview - Copie.xlsm
    177.3 KB · Affichages: 5

KTM

XLDnaute Impliqué
BIEN MERCI
je voudrais pouvoir faire un tri par rapport à un code Patient saisi et faire si possible des modifications dans ma base
J'ai illustré dans ce fichier joint.

Merci.
 

Pièces jointes

  • listview - Copie.xlsm
    178.2 KB · Affichages: 8

KTM

XLDnaute Impliqué
c'est super
Mais ce serait plus intéressant que la listview affiche uniquement les enregistrements dont le code sera indiqué dans la combobox1 et le tour sera joué
Merci encore pour le soutient.
 

KTM

XLDnaute Impliqué
Je n'avais pas relevé : ça change la donne
Bizarre, je ne vois pas plusieurs patients avec le même code
Je reexplique pour que ce soit plus clair
Un unique code est attribué à un patient mais les autres données ( Protocole .......) peuvent changer plustard
Donc pour un seul code on peut avoir plusieurs enregistrements differents.
 

CHALET53

XLDnaute Barbatruc
Ce que tu souhaites :
Pour un code patient (en combobox1), on affiche dans la listview tous les enregistrements lié à ce code patient
Ensuite, dans la listview, sélection d'une ligne et modification possible pour cette ligne sélectionnée
A confirmer
 

Discussions similaires

Réponses
19
Affichages
1 K
Réponses
8
Affichages
613
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…