Re: abjMouseWheel

David,

Have you checked References to make sure none are marked 'MISSING', though
it shouldn't just be impacting only one module it's worth the look. I would
also check that Name AutoCorrect is unchecked.

Also, when you say it only occurs '...in my form...', does that mean their
are other people using the using the datbase and they are not having the
same problem? I would also check to make sure all updates have been
installed.

Also, what version of Windows?

--
Gina Whipp

"I feel I have been denied critical, need to know, information!" - Tremors
II

http://www.regina-whipp.com/index_files/TipList.htm

"David" <msgroup@xxxxxxxxxxxxx> wrote in message
news:%23QMUgZXCKHA.3556@xxxxxxxxxxxxxxxxxxxxxxx
This used to work. By that I mean, when in a form, I could move the wheel
forward or back and the form would page up or down. It worked fine
before. But after I installed A2007 in new computer (same Win Ver. as well
as A2007), the wheel no longer functioned at all (but this only occurs in
my Form). All other aspects within A2007, the Mouse wheel is functioning,
just not in my Form as it used to.

"Gina Whipp" <NotInterested@xxxxxxxxxxxxx> wrote in message
news:uIIBpVXCKHA.5068@xxxxxxxxxxxxxxxxxxxxxxx
David,

Does any of your code work? Is your database in a Trusted Location? The
module does work in Access 2007.

--
Gina Whipp

"I feel I have been denied critical, need to know, information!" -
Tremors II

http://www.regina-whipp.com/index_files/TipList.htm

"David" <msgroup@xxxxxxxxxxxxx> wrote in message
news:OuB%23G%23WCKHA.4792@xxxxxxxxxxxxxxxxxxxxxxx
Here is what I have that used to work on an older machine that was also
running A2007.

Public Function DoMouseWheel(frm As Form, lngCount As Long) As Integer
On Error GoTo Err_Handler
'Purpose: Make the MouseWheel scroll in Form View in Access 2007.
' This code lets Access 2007 behave like older versions.
'Return: 1 if moved forward a record, -1 if moved back a record, 0
if not moved.
'Author: Allen Browne, February 2007.
'Usage: In the MouseWheel event procedure of the form:
' Call DoMouseWheel(Me, Count)
Dim strMsg As String
'Run this only in Access 2007 and later, and only in Form view.
If (Val(SysCmd(acSysCmdAccessVer)) >= 12#) And (frm.CurrentView = 1)
And (lngCount <> 0&) Then
'Save any edits before moving record.
RunCommand acCmdSaveRecord
'Move back a record if Count is negative, otherwise forward.
RunCommand IIf(lngCount < 0&, acCmdRecordsGoToPrevious,
acCmdRecordsGoToNext)
DoMouseWheel = Sgn(lngCount)
End If

Exit_Handler:
Exit Function

Err_Handler:
Select Case Err.Number
Case 2046& 'Can't move before first, after last, etc.
Beep
Case 3314&, 2101&, 2115& 'Can't save the current record.
strMsg = "Cannot scroll to another record, as this one can't be
saved."
MsgBox strMsg, vbInformation, "Cannot scroll"
Case Else
strMsg = "Error " & Err.Number & ": " & Err.Description
MsgBox strMsg, vbInformation, "Cannot scroll"
End Select
Resume Exit_Handler
End Function

"Gina Whipp" <NotInterested@xxxxxxxxxxxxx> wrote in message
news:uvbkihWCKHA.3556@xxxxxxxxxxxxxxxxxxxxxxx
David,

Sounds like you forgot to install the .dll files... If that is the
case, go back to http://www.lebans.com/mousewheelonoff.htm and
redownload to get the files again.

--
Gina Whipp

"I feel I have been denied critical, need to know, information!" -
Tremors II

http://www.regina-whipp.com/index_files/TipList.htm

"David" <msgroup@xxxxxxxxxxxxx> wrote in message
news:CF473916-4AB4-4331-9E56-FA372C072176@xxxxxxxxxxxxxxxx
Some time back, I got the referenced module from one of these groups.
The
purpose of the module is to control how the wheel on the mouse is used
by a
form in A2007. It in effect changes pages when the wheel is moved.
The problem I have is that when I got a new computer and reinstalled
A2007,
the module was not longer functioning.
Can anyone give me instructions as to how to "install" this module?









.

Relevant Pages

  • Re: wheelmouse 3rd button
    ... > OK I have sa microsoft Optical wheel mouse. ... You'll need to scroll down to the section which describes the mouse input ... My advice would be to go for Slackware 10. ... Install swaret and learn how to use it. ...
    (alt.os.linux)
  • Re: abjMouseWheel
    ... Gina Whipp ... wheel forward or back and the form would page up or down. ... MsgBox strMsg, vbInformation, "Cannot scroll" ... Sounds like you forgot to install the .dll files... ...
    (microsoft.public.access.modulesdaovba)
  • Re: abjMouseWheel
    ... lngCount As Long) As Integer ... Make the MouseWheel scroll in Form View in Access 2007. ... MsgBox strMsg, vbInformation, "Cannot scroll" ... Sounds like you forgot to install the .dll files... ...
    (microsoft.public.access.modulesdaovba)
  • Re: abjMouseWheel
    ... Make the MouseWheel scroll in Form View in Access 2007. ... MsgBox strMsg, vbInformation, "Cannot scroll" ... "Gina Whipp" wrote in message ... Sounds like you forgot to install the .dll files... ...
    (microsoft.public.access.modulesdaovba)
  • Re: abjMouseWheel
    ... By that I mean, when in a form, I could move the wheel forward or back and the form would page up or down. ... "Gina Whipp" wrote in message ... Make the MouseWheel scroll in Form View in Access 2007. ... MsgBox strMsg, vbInformation, "Cannot scroll" ...
    (microsoft.public.access.modulesdaovba)
Loading