Bonjour le forum,
J'ai un problème sur un de mes formulaires comprenant une listview.
Cette listview est initialisée grâce à un bouton présent dans le formulaire selon des données qui vont être saisies par l'utilisateur. Jusque là pas de problème, ma ListView1 va afficher les données de l'utilisateur selon ces premiers choix.
Une fois la listView affichée, je souhaite donner la possibilité à l'utilisateur de modifier certaines de ces données après cliquer sur la ligne de son choix.
J'ai rajouté un sub ListView1_ItemClick à mon code mais là lorsque j'ouvre mon userform j'ai une erreur : Erreur d'exécution '-2147352573 (80020003)': Objet Spécifié introuvable et ça me renvoie sur mon sub ListView1_ItemClick.
Voici ce sub :
Est-ce que le problème vient du fait que mon userform_initialize n'initialise pas ma ListView1 directement ?
Et donc la présence de ListView1_ItemClick ne passe pas ?
Deuxième soucis pour le formatage dans ma listview :
ce code là ne fonctionne pas, j'ai beau cherché je ne comprends pas pourquoi il bloque sur la fonction format ?
Merci par avance
J'ai un problème sur un de mes formulaires comprenant une listview.
Cette listview est initialisée grâce à un bouton présent dans le formulaire selon des données qui vont être saisies par l'utilisateur. Jusque là pas de problème, ma ListView1 va afficher les données de l'utilisateur selon ces premiers choix.
Une fois la listView affichée, je souhaite donner la possibilité à l'utilisateur de modifier certaines de ces données après cliquer sur la ligne de son choix.
J'ai rajouté un sub ListView1_ItemClick à mon code mais là lorsque j'ouvre mon userform j'ai une erreur : Erreur d'exécution '-2147352573 (80020003)': Objet Spécifié introuvable et ça me renvoie sur mon sub ListView1_ItemClick.
Voici ce sub :
VB:
Private Sub ListView1_ItemClick(ByVal Item As MSComctlLib.ListItem)
Dim L, c As Long
L = Me.ListView1.SelectedItem.Index
Me("TextBox" & 5) = Me.ListView1.ListItems(L).ListSubItems(1).Text
Me("TextBox" & 6) = Me.ListView1.ListItems(L).ListSubItems(3).Text
Me("TextBox" & 6) = Me.ListView1.ListItems(L).ListSubItems(5).Text
End Sub
Est-ce que le problème vient du fait que mon userform_initialize n'initialise pas ma ListView1 directement ?
Et donc la présence de ListView1_ItemClick ne passe pas ?
Deuxième soucis pour le formatage dans ma listview :
ce code là ne fonctionne pas, j'ai beau cherché je ne comprends pas pourquoi il bloque sur la fonction format ?
VB:
.ListItems(.ListItems.Count).ListSubItems.Add , "Temp!D" & i, Format(Sheets("Temp").Cells(i, 4), "#,##0")
Merci par avance