Autres tester le scroll de la frame

Cousinhub

XLDnaute Barbatruc

• 19 Mai 2024

• #2

Hello,
W11, xl2021 64
Débogage :

 

Vote positif 0 Vote négatif

Gégé-45550

XLDnaute Accro

• 19 Mai 2024

• #3

patricktoulon à dit:

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

Cliquez pour agrandir...

patricktoulon à dit:

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

Cliquez pour agrandir...

Bonjour Patrick,
avec Office 365 64 bits

 

Pièces jointes

• 
  Capture d'écran 2024-05-19 162605.png

  41.6 KB · Affichages: 12

Vote positif 0 Vote négatif

patricktoulon

XLDnaute Barbatruc

• 19 Mai 2024

• #4

bon merci a tout les deux
j'avoue je suis perdu
@Cousinhub j'ai vérifié la déclaration est bonne je comprends pas

@Gégé-45550 alors c'est pire
quel raison pourrait il y avoir c'est bien la frames

je crois que je vais abandonner l'adaptation de mon app en 64
trop de bugs injustifiés
merci à tout les deux je suis encore plus dans le brouillard

juste pour vous montrer ça fonctionne en vba7 32 bits

 

Vote positif 0 Vote négatif

Nicolas JACQUIN

XLDnaute Occasionnel

Supporter XLD

• 19 Mai 2024

• #5

Win10 64bits et excel2021 32bits, chez moi c'est bon

 

Dernière édition: 19 Mai 2024

Vote positif 0 Vote négatif

patricktoulon

XLDnaute Barbatruc

• 19 Mai 2024

• #6

merci nicolas le 32 je sais il n'y a pas de soucis

 

Vote positif 0 Vote négatif

Dudu2

XLDnaute Barbatruc

• 19 Mai 2024

• #7

Bonjour,
J'ai la même erreur que @Cousinhub.
Et c'est normal puisque SetWindowsHookEx retourne un LongPtr et que plHooking est déclaré en Long.
Par contre si le déclare plHooking en LongPtr c'est fermeture du classeur. Mais avant je vais essayer de capturer l'erreur qui s'affiche en 1/5ème de seconde.

 

Vote positif 0 Vote négatif

patricktoulon

XLDnaute Barbatruc

• 19 Mai 2024

• #8

re et avec tout en longptr ?

VB:

Declare PtrSafe Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" (ByVal Destination As LongPtr, ByVal Source As LongPtr, ByVal Length As LongPtr)
Declare PtrSafe Function SetWindowsHookEx Lib "user32" Alias "SetWindowsHookExA" (ByVal idHook As LongPtr, ByVal lpfn As LongPtr, ByVal hmod As LongPtr, ByVal dwThreadId As LongPtr) As LongPtr
Declare PtrSafe Function CallNextHookEx Lib "user32" (ByVal hHook As LongPtr, ByVal nCode As LongPtr, ByVal wParam As LongPtr, lParam As LongPtr) As LongPtr
Declare PtrSafe Function UnhookWindowsHookEx Lib "user32" (ByVal hHook As LongPtr) As LongPtr
Declare PtrSafe Function GetCursorPos Lib "user32" (lpPoint As POINTAPI) As Long

 

Vote positif 0 Vote négatif

Dudu2

XLDnaute Barbatruc

• 19 Mai 2024

• #9

Voilà ce que j'ai pu choper.

 

Vote positif 0 Vote négatif

mutzik

XLDnaute Barbatruc

• 19 Mai 2024

• #10

coucou toutes et tous

pas de souci chez moi

 

Vote positif 0 Vote négatif

Cousinhub

XLDnaute Barbatruc

• 19 Mai 2024

• #11

Re-,

Même en mettant

VB:

Declare PtrSafe Function GetCursorPos Lib "user32" (lpPoint As POINTAPI) As LongPtr

Mais comme les API et moi, c'est un peu comme toi et PQ....
Et j'ai ce msg dès que je veux compiler

 

Vote positif 0 Vote négatif

Dudu2

XLDnaute Barbatruc

• 19 Mai 2024

• #12

Oui alors LowLevelMouseProc je lui ai fait retourner un LongPtr, mais c'est fermeture du classeur sans info d'erreur.

 

Vote positif 0 Vote négatif

Dudu2

XLDnaute Barbatruc

• 19 Mai 2024

• #13

Je reviens dans 2h. Bonne recherche.

 

Vote positif 0 Vote négatif

Cousinhub

XLDnaute Barbatruc

• 19 Mai 2024

• #14

Re-,
J'ai remplacé tous les Long par LongPtr -> plus de bug à la compilation
Par contre, si je scrolle sur l'USF (qui s'ouvre donc bien), j'ai cette erreur

Oups, avec le msg d'erreur, c'est mieux

 

Vote positif 0 Vote négatif

Cousinhub

XLDnaute Barbatruc

• 19 Mai 2024

• #15

Re-,
Et au passage de la souris :

 

Vote positif 0 Vote négatif