Microsoft 365 Résolu - Afficher listview dans label

Angus HEYERDAHL

XLDnaute Junior
Bonjour à tous,

J'ai eu beau chercher je n'arrive pas à trouver comment afficher les éléments d'une listview dans des labels.

Quelqu'un aurait-il une idée svp

Merci par avance
 

Angus HEYERDAHL

XLDnaute Junior
Le but est d’empêcher toute modification "accidentelle" des éléments à mettre dans ces labels et de modifier uniquement ce qu'il y a dans la ou les textbox, connaissant mes collègues, il vaut mieux.
 

Pièces jointes

  • Exemple listview.xlsm
    36.8 KB · Affichages: 9

patricktoulon

XLDnaute Barbatruc
re

Le but est d’empêcher toute modification "accidentelle" des éléments à mettre dans ces labels et de modifier uniquement ce qu'il y a dans la ou les textbox, connaissant mes collègues, il vaut mieux


et q'uest ce que tu t'ennuie pour rien
met que des textboxs et
dans l'event keydown du des textboxs concernés( qui ne doit pas etre modifié) tu met keycode=0
terminé on pourra pas modifier avec le clavier les textboxs
 

vgendron

XLDnaute Barbatruc
et oui, je suis d'accord avec Patrick
si tu ne veux pas qu'ils modifient.. il suffit de ne pas leur proposer
maintenant.. si l'idée est "Juste" d'afficher les données de la ligne selectionnée dans la listview
tu peux effectivement les afficher dans des labels. mais tu peux aussi les afficher dans des textbox disabled

et pour afficher les données dans les labels ou textbox. il faut que ces données existent dans la listview
dans ton exemple; la listview n'est chargée qu'avec ID /Nom/ Prénom /Date
donc;. pour le sexe et ville.. bah.. y a rien à charger

VB:
Private Sub ListView1_ItemClick(ByVal Item As MSComctlLib.ListItem)
Dim Ind As Integer

Ind = Me.ListView1.SelectedItem.Index
Me.Lbl_Nom = Me.ListView1.SelectedItem.SubItems(1)
Me.Lbl_Prénom = Me.ListView1.SelectedItem.SubItems(2)
'Me.Lbl_Sexe = Me.ListView1.SelectedItem.SubItems(3)
End Sub

après. j'avais mis l'ID pour pouvoir retrouver la ligne dans la feuille excel
 

Discussions similaires

Statistiques des forums

Discussions
314 630
Messages
2 111 354
Membres
111 113
dernier inscrit
ADA1327