Discussion :

[FERREY45]

Bonjour,
en utilisant le code donné sur le forum pour désactiver la molette de la souris dans une application access,
J'ai une erreur de compilation :
La déclaration de procédure ne correspond pas à la description de l'événement ou de la procédure de même nom

sur :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Private Sub clsMouseWheel_MouseWheel(Cancel As Integer)
    Cancel = True
End Sub

Le code total est :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
 
Option Compare Database
Option Explicit
Private WithEvents clsMouseWheel As MouseWheel.CMouseWheel
 
Private Sub Form_Load()
        'Code à rajouter dans l'événement chargement de chaque formulaire
   Set clsMouseWheel = New MouseWheel.CMouseWheel
   Set clsMouseWheel.Form = Me
   clsMouseWheel.SubClassHookForm
End Sub
 
Private Sub Form_Close()
    'Code à rajouter dans l'événement fermeture de chaque formulaire
   If Not (clsMouseWheel Is Nothing) Then
        clsMouseWheel.SubClassUnHookForm
        Set clsMouseWheel.Form = Nothing
        Set clsMouseWheel = Nothing
    End If
End Sub
 
Private Sub clsMouseWheel_MouseWheel(Cancel As Integer)
    Cancel = True
End Sub

La MousWheel est bien cochée dans les références.

Merci de votre aide
PS. je suis débutant

[curt]

Bonjour,

Tu dois copier mouseWheel.dll dans C:\windows\system32

et ensuite <Démarrer> <Exécuter> <REGSVR32.EXE C:\Windows\System32\MouseWheel.dll>

Après ça devrait rouler !!

Curt

[FERREY45]

Après avoir fait la manipulation indiquée j'ai malheureusement toujour l'erreur de compilation.

[curt]

Bonjour,

as-tu copié le fichier joint dans

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

C:\Windows\system32\

et ensuite entré

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

<Démarrer> <Exécuter> <REGSVR32.EXE C:\Windows\System32\MouseWheel.dll>

Curt

[FERREY45]

OUI, j'ai bien fait ce que vous m'indiquiez.Sans résultat.

Mais je viens de tester ce que propose : arkham46
et tout fonctionne

Merci à vous pour votre aide