mouse wheel scroll issue

paul.clarke

Registered User.
Local time
Today, 13:17
Joined
Mar 13, 2009
Messages
51
Hi

The mouse wheel scrolling between records no longer works on my forms since switching to access 2007.

I found this link which should resolve it if i add code to a module etc
(link) http://allenbrowne.com/ser-70.html

The trouble is i cannot do step 4 as when i goto "properties" and "event tab" i do not have any "on mouse scroll" option...

i do have "on mouse down", "on mouse up" etc... how can i resolve this??

thanks
 
You should put the code in Module and name it "abjMouseWheel"

on the event : On Mouse Wheel ... put the code "Call DoMouseWheel(Me, Count)"

Look at this :
Assuming you are using Access 2007 or later, the steps are:

  • On the Create tab of the ribbon, in the Other group (rightmost), click the arrow below Macro, and choose Module. Access opens a new module.
  • Paste in the code below into the module. To verify Access understands it, choose Compile on the Debug menu (in the code window.)
  • Save the module, with a name such as abjMouseWheel. (The module name is not important, but it must be different to the function name.)
  • Open your form in design view. On the Event tab of the Properties sheet, set the On Mouse Wheel property to:
    [Event Procedure]
  • Click the Build button (...) beside the property. Access opens the code window. Between the Private Sub ... and End Sub lines, enter:
    Call DoMouseWheel(Me, Count)
  • Repeat steps 4 and 5 for your other forms.
 
Last edited:
Is there anyway to create a ONE Function rather than a multiple Subs for the OnMouse Wheel Event?

Simon
 
What do you mean by
"ONE Function rather than a multiple Subs"
 
Subs are Form based, so each Form would need a Module, none of my Forms or Reports have a Modules, everything is in application wide Functions.

Simon
 

Users who are viewing this thread

Back
Top Bottom