XL 2016 Parametrer ListView

  • Initiateur de la discussion Initiateur de la discussion KTM
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

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

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+
 
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

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
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
3
Affichages
212
Réponses
38
Affichages
1 K
  • Question Question
Microsoft 365 macro TCD
Réponses
4
Affichages
272
Réponses
5
Affichages
428
Réponses
2
Affichages
436
Retour