Bonjour,
J'aimerai désactiver la souris dans un sous formulaire qui est présenté en feuille de données.
J'ai regardé dans plusieurs tutos, mais je préfère passer par un code VBA (plus fiable) que la gestion par une dll (problèmes de droits administrateurs sur le pc).
J'ai récupéré le code suivant :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9 Private Sub Form_MouseWheel(ByVal Page As Boolean, ByVal Count As Long) On Local Error Resume Next If Count > 0 Then DoCmd.GoToRecord , , acPrevious Else DoCmd.GoToRecord , , acNext End If End Sub
Partager