Récupérer l'icon de l'item selectionner dans une listview [Résolu]

Signaler
Messages postés
87
Date d'inscription
mercredi 30 avril 2008
Statut
Membre
Dernière intervention
15 décembre 2010
-
Messages postés
87
Date d'inscription
mercredi 30 avril 2008
Statut
Membre
Dernière intervention
15 décembre 2010
-
slt

je suis sous vba excel,je veux récupérer l'icon associé a l'item selectionnée dans la listview pour l'affecter a un autre controle..comment faire??

11 réponses

Messages postés
17286
Date d'inscription
mercredi 2 janvier 2002
Statut
Modérateur
Dernière intervention
23 décembre 2019
66
Je ne me suis pas relu, tu n'a pas ouvert l'oeil non plus :

Set Picture1.Picture = ImageList.ListImages(1).Picture

pour récupérer l'image d'index 1

donc dans ton cas :

Set btn.Picture = ListView1.Icons(ListView1.SelectedItem.Icon)


si

Set Picture1.Picture = ImageList.ListImages(1).Picture

dans ton cas :

Set btn.Picture = ListView1.Icons.ListImages(ListView1.SelectedItem.Icon).Picture

Renfield - Admin CodeS-SourceS - MVP Visual Basic & Spécialiste des RegExp
Messages postés
17286
Date d'inscription
mercredi 2 janvier 2002
Statut
Modérateur
Dernière intervention
23 décembre 2019
66
ListView1.SelectedItem.Icon

Renfield - Admin CodeS-SourceS - MVP Visual Basic & Spécialiste des RegExp
Messages postés
87
Date d'inscription
mercredi 30 avril 2008
Statut
Membre
Dernière intervention
15 décembre 2010

salut,
Merci pour la réponse mais quand j'essaye par exemple
btn.Picture = ListView1.SelectedItem.Icon il génére une erreur 424 (objet requis)..une idée??
Messages postés
17286
Date d'inscription
mercredi 2 janvier 2002
Statut
Modérateur
Dernière intervention
23 décembre 2019
66
Icon te donne l'index de l'icone de l'ImageList associé au listview et non une image

Renfield - Admin CodeS-SourceS - MVP Visual Basic & Spécialiste des RegExp
Messages postés
87
Date d'inscription
mercredi 30 avril 2008
Statut
Membre
Dernière intervention
15 décembre 2010

et comment récupérer l'image svp je bloque la!!je veux récupérer l'image et non pas l'index
Merci d'avance
Messages postés
17286
Date d'inscription
mercredi 2 janvier 2002
Statut
Modérateur
Dernière intervention
23 décembre 2019
66
en demandena ta l'imagelist :

Set Picture1.Picture = ImageList.ListImages(1).Picture

pour récupérer l'image d'index 1

donc dans ton cas :

Set btn.Picture = ListView1.Icons(ListView1.SelectedItem.Icon)

ou

Set btn.Picture = ListView1.SmallIcons(ListView1.SelectedItem.SmallIcon)

Renfield - Admin CodeS-SourceS - MVP Visual Basic & Spécialiste des RegExp
Messages postés
87
Date d'inscription
mercredi 30 avril 2008
Statut
Membre
Dernière intervention
15 décembre 2010

j'ai essayé mais j'obtient une erreur 438 qui dit: propriété ou methode non géré par l'objet :(
Messages postés
17286
Date d'inscription
mercredi 2 janvier 2002
Statut
Modérateur
Dernière intervention
23 décembre 2019
66
étrange, le code que je t'ai filé est fonctionnel, je viens de tester

a quel niveau cela coince ?

(quelle propriété ou méthode est incriminée ?)

Renfield - Admin CodeS-SourceS - MVP Visual Basic & Spécialiste des RegExp
Messages postés
87
Date d'inscription
mercredi 30 avril 2008
Statut
Membre
Dernière intervention
15 décembre 2010

il coince exactement a cette ligne :
Set btn.Picture = ListView1.Icons(ListView1.SelectedItem.Icon)
y'a pas de propriété a activer pour le bouton pour que cela marche !!
Messages postés
87
Date d'inscription
mercredi 30 avril 2008
Statut
Membre
Dernière intervention
15 décembre 2010

pour info j'associe cette ligne de code(Set btn.Picture = ListView1.Icons(ListView1.SelectedItem.Icon) ) a l'évenement click d'un autre bouton
Messages postés
87
Date d'inscription
mercredi 30 avril 2008
Statut
Membre
Dernière intervention
15 décembre 2010

ah oui dsl par ce que j'était débordé j'ai pas fais attention merci tu ma vraiment aidé ;)