Mouse Wheel ON/OFF Subforms - Lebans MouseWheel On/Off

[Jack]

Hi all,

I searched the archives and found everyone happy with Stephen's
MouseWheel On/Off code except for those with subforms. Stephen's page
indicates that he has added code to handle subforms ("Bug Fix for
SubForms with ScrollBars. Bug fix for SubForms without visible
ScrollBars.") - BUT I still can't get it to work on my app with my
subforms.

I'm using Access 2000, It works fine on the main forms but not on the
subforms.

I've tried adding the code to just the start up form, the main form,
the subform itself but all fails to stop the subform from scrolling
records.

Any ideas???

Thanks in advance

Regards
Jack

[Stephen Lebans]

The overwhelming majority of users have requested that the MouseWheel
function as normal within a Subform. I personally do not see why you
would not want your users to be able to scroll through the subform with
the mousewheel. But since you are the third person in the last week to
request it I will add an optional param to the function call to enable
you disable the MouseWheel for Subforms.

--

HTH
Stephen Lebans
http://www.lebans.com
Access Code, Tips and Tricks
Please respond only to the newsgroups so everyone can benefit.
"Jack" <[e-mail] > wrote in message
news:8e******** *************** ***@posting.goo gle.com...

Hi all,

I searched the archives and found everyone happy with Stephen's
MouseWheel On/Off code except for those with subforms. Stephen's page
indicates that he has added code to handle subforms ("Bug Fix for
SubForms with ScrollBars. Bug fix for SubForms without visible
ScrollBars.") - BUT I still can't get it to work on my app with my
subforms.

I'm using Access 2000, It works fine on the main forms but not on the
subforms.

I've tried adding the code to just the start up form, the main form,
the subform itself but all fails to stop the subform from scrolling
records.

Any ideas???

Thanks in advance

Regards
Jack

[Jack]

Stephen

The reason behind my wishes:

I have the main form with a list box, this list box loads any one of
four separate subforms (subcontainer.s ource = "xyz") for users to
follow a particular flowpath dependent on what was chosen in the list
box.

Once the subform is loaded they STAY in that record until a different
record is chosen from the list box in the main form.

It is also necessary as I am manually looking after record locking so
I want users not be to able to move from the record without clicking
the custom button (and that's a whole other matter mainly due to poor
design in the beggining).

Your efforts are much appreciated by me and I'm sure all those other
users out there using your tools.

Thanks
Regards

Jack

"Stephen Lebans" <Fo************ *************** *************@l invalid.com> wrote in message news:<nU******* **************@ ursa-nb00s0.nbnet.nb .ca>...

The overwhelming majority of users have requested that the MouseWheel
function as normal within a Subform. I personally do not see why you
would not want your users to be able to scroll through the subform with
the mousewheel. But since you are the third person in the last week to
request it I will add an optional param to the function call to enable
you disable the MouseWheel for Subforms.

--

HTH
Stephen Lebans
http://www.lebans.com
Access Code, Tips and Tricks
Please respond only to the newsgroups so everyone can benefit.
"Jack" <[e-mail] > wrote in message
news:8e******** *************** ***@posting.goo gle.com...

Hi all,

I searched the archives and found everyone happy with Stephen's
MouseWheel On/Off code except for those with subforms. Stephen's page
indicates that he has added code to handle subforms ("Bug Fix for
SubForms with ScrollBars. Bug fix for SubForms without visible
ScrollBars.") - BUT I still can't get it to work on my app with my
subforms.

I'm using Access 2000, It works fine on the main forms but not on the
subforms.

I've tried adding the code to just the start up form, the main form,
the subform itself but all fails to stop the subform from scrolling
records.

Any ideas???

Thanks in advance

Regards
Jack