Discussion :

[François2023]

Bonjour,
Premier post sur ce site, alors merci de votre compréhension et de votre indulgence. Ci joint un fichier excel .
Mon problème :

Avec Datalist je n'arrive pas remplir la DatalistBox.

Avec ListeBox j'arrive à remplir la liste, à sélectionner un item de la liste, à entrer en édition dans cette liste. Problème la roulette de la souris ne fonctionne pas. (pour l'instant j'utilise une procédure hook qui fonctionne mais qui ne me satisfait pas.

Avec ListView j'arrive à remplir la ListView, à sélectionner un item, mais je n'arrive pas à entrer en édition dans la liste (je voudrai savoir s'il est possible d'avoir l'équivalent des deux fonctions de la ListeBox : .ListIndex = 0 et .Activate). Je ne peux rentrer dans la liste que si je click dessus.

D'avance Merci

[jurassic pork]

Hello,
1 - il me semble que le contrôle activex datalist est un contrôle Access ? chez moi je ne l'ai pas ( office Famille et Etudiant 2016 pas d'access).
2 - Que reproches-tu à ta procédure Hook que d'ailleurs tu n'as pas mise dans ton fichier exemple ?
3 - Chez moi le contrôle activex ListView mis dans une feuille produit des comportements étranges ( excel 2016) : positionnement de l'affichage.

Ami calmant, J.P

[François2023]

Bonjour,
Ci-joint un exemple avec la procédure Hook utilisée avec le contrôle Listebox1. Le problème est que tant que le Hook est actif, la molette ne fonctionne plus dans les autres applications(ni même dans l'éditeur excel ...). Le but avec le contrôle listeview1 est de ne plus perturber le comportement de cette molette car sa gestion est effectuée en natif. Mon problème pour y arriver est que la fonction Liseview1.activate n'a pas d'effet ( a la différence avec le Listebox1.ListIndex = 0 suivi de Listebox1.Activate . Ma version Excel : 2019 32 Bits, les références des contrôles utilisés sont dans le fichier joint.
Concernant le Datalist1 je voulais juste voir si ce contrôle pouvait remplacer le Listeview, mais je n'arrive pas à le remplir (Base de donnée jointe).
Cordialement,
MF

[jurassic pork]

tu peux regarder ici pour voir si tu trouves ton bonheur : VBA-UserForm-MouseScroll .

[François2023]

Bonjour,
Ta solution fonctionne parfaitement en mode Userform, mais je ne saurai l'adapter en mode feuille. Comment déclarer la feuille pour être compatible avec l'instruction : Public Function EnableMouseScroll(ByVal uForm As MSForms.UserForm, Optional ByVal passScrollToParentAtMargins As Boolean = True) As Boolean. L'instruction EnableMouseScroll Me ne fonctionne pas en mode feuille.
Cordialement,
MF

[jurassic pork]

Question bête : pourquoi ne pas utiliser la touche du clavier flèche vers le bas et flèche vers le haut pour se déplacer dans la Listbox. Si on laisse la touche appuyée cela fait comme avec la molette de la souris en mouvement.