listview
Bonjour tout le monde,
J'explique mon probleme, j'ai une listview qui affiche un résultat à partir de 4feuilles du classeur excel (via une combobox qui contient comme choix : feuil1, Feuil2, Feuil3, Feuil4).
Dans chaque feuilles les titres des colonnes sont différents.
J'ai créé des textbox correspondant aux titres des colonnes de chaque feuille du classeur dans l'userform qui contient la listview.
Voila ce que je cherche à faire :
- clicker sur une ligne de la listview pour que les differentes parties s'affiches dans les textbox correspondantes. Sachant que, par exemple, la colonne 1 sera différente selon la feuille selectionner dans la listview.
Pour l'instant le code que j'ai ne prend pas en compte les differences de titre des colonnes des differentes feuilles :
je sais pas si j'ai été très claire.
Je joint un bout de mon fichier pour plus de visibilité.
Bonjour tout le monde,
J'explique mon probleme, j'ai une listview qui affiche un résultat à partir de 4feuilles du classeur excel (via une combobox qui contient comme choix : feuil1, Feuil2, Feuil3, Feuil4).
Dans chaque feuilles les titres des colonnes sont différents.
J'ai créé des textbox correspondant aux titres des colonnes de chaque feuille du classeur dans l'userform qui contient la listview.
Voila ce que je cherche à faire :
- clicker sur une ligne de la listview pour que les differentes parties s'affiches dans les textbox correspondantes. Sachant que, par exemple, la colonne 1 sera différente selon la feuille selectionner dans la listview.
Pour l'instant le code que j'ai ne prend pas en compte les differences de titre des colonnes des differentes feuilles :
Private Sub ListView1_Click()
For i = 1 To ListView1.ListItems.Count
If ListView1.ListItems(i).Selected = True Then
TextBox12 = ListView1.ListItems(i).Text
TextBox11 = ListView1.ListItems(i).ListSubItems(2).Text
TextBox4 = ListView1.ListItems(i).ListSubItems(3).Text
TextBox9 = ListView1.ListItems(i).ListSubItems(4).Text
End If
Next
End Sub
je sais pas si j'ai été très claire.
Je joint un bout de mon fichier pour plus de visibilité.
Pièces jointes
Dernière édition: