Autres tester le scroll de la frame

[patricktoulon]

bonjour à tous
est ce que plusieurs d'entre vous pourraient tester le scroll de la frame avec la mollette sur des versions 365 2019 et 2021 svp
merci pour les retours

 

[patricktoulon]

voilà donc on plante plus
oui la scrollbar c'est pour le fun donc c'est pas bien grave si on la retire de l'équation
bon comme on est en addressof les messages se sont multipliés mais bon on est pas planté

on est d'accords on peut dire que l'erreur critique n'est plus destructrice ?

 

[Cousinhub]

Hélas......
Ajout des " autour de Frame
Quelques scroll sur la Frame (un peu hésitant)
Déplacement sur la listbox, au-revoir.....

 

[patricktoulon]

re
re
au revoir oui mais çà plante et si oui ou ?

 

[Cousinhub]

Re-,
scrolls sur Frame, au début, hésitant, mais je persiste, un peu plus gouleyant par la suite
Déplacement vers la ListBox, 1 Scroll, décollage immédiat...(nez fin d'avoir fermé mes fichiers ouverts....)

 

[fanch55]

Ofiice 2021 64bits :

 

[Cousinhub]

RE-,
@fanch55

 

[fanch55]

Aie, le combobox s'y met aussi ...

 

[fanch55]

RE-,
@fanch55
Regarde la pièce jointe 1197553

Pareil donc ...

 

[patricktoulon]

et toi fanch55 tu arrive a reproduire son erreur?
sinon j'ai oublié de remttre le exit a la sub au cas ou
car les address de plhooking quelques fois sont negatives

Public Sub HookMouse(ByVal ControlToScroll As Object, Optional ByVal FormName As String)
   If plHooking <> 0 Then UnHookMouse: Exit Sub
   If plHooking < 1 Then    ' active le hook si un autre n'est pas démarré
        EpC = EmplacementControl(ControlToScroll)    ' Get the control's rectangle relative to the screen (not the parent) into an array
        Set CtrlHooked = ControlToScroll
        plHooking = SetWindowsHookEx(WH_MOUSE_LL, AddressOf LowLevelMouseProc, 0, 0)
    End If
End Sub

 

[Cousinhub]

Regarde la pièce jointe 1197557Pareil donc ...
Regarde la pièce jointe 1197558

 

[fanch55]

et toi fanch55 tu arrive a reproduire son erreur?
sinon j'ai oublié de remttre le exit a la sub au cas ou
car les address de plhooking quelques fois sont negatives

Non, je ne me crache pas mais j'ai les messages d'erreur en cascade ....
C'est ben embêtant pour analyser le pourquoi de la différence ... 🤔

Regarde la pièce jointe 1197559

Tu es en W10 ou W11 ?

 

[Cousinhub]

W11

 

[patricktoulon]

re
bon en metant des debug partout j'ai fini par comprendre ce qu'il se passe
et pour le coup c'est vraiment très bête
en fait que je passe t il
move sur le control
appel rouletambour qui appelle hookmouse
arrivé là que ce passe til
et bien avant si plhooking<>0 on envoie la patate sauf que si c'est toujours le même control il ferme le hook et en ré ouvre un autre pour le même control sous une autre addresse memoire et y compris apres pour la structure souris (2 addresse memoire pour rien)
la dessus tu ajoute la latence (64 bits)
ben on a une confusion plhooking rien ou quelque chose ( il sait plus rufus)
rufus c'est le prénom de mon pc 😁

alors qu'en fait en testant ctrlhooked= controltoscroll ben non seulement on fait pas mais on relance pas on le laisse continuer
et la pour le coup je n'ai carrément plus de ligne de bugué dans ma console
alors qu'avant je bougeais de 2 mm j'avais 25 lignes (25 adresses mémoire *2 (plhooked et la structure souris)
et oui moi aussi j'avais des erreurs sauf qu'elle ne me faisait pas planter excel
si j'avais mis ces debug plus tôt j'aurais compris tout de suite
même sur 2013 on voit bien que c'est plus fluide
chez moi
plus rapide
plus un seul raté
plus une seule ligne dans la console
je pense que là je tiens une bonne piste

 

[Nicolas JACQUIN]

Re, le Scrollbar, si tu en sort et y re-rentre il fonctionne plus

 

[Cousinhub]

Bon,
Comme il faut bien essayer...
J'ai fait tous les Scroll, à part la 1ère "Frame", qui a eu du mal à décoller...
Sinon, ça allait...
Puis, un petit "pipi", je reprends ma souris, et hop, crash
Donc, pas fiable dans l'temps