G
greg
Hi,
I have a form with a large, variable number of Rectangle controls (up to
200) which I want to reposition independantly with the mouse (I am actually
creating some ms project gantt chart functionality). I can handle the VBA
behind moving the controls with the mouse, and have got this working using
the seperate object events - but because of the large number of controls I am
guessing that a class module for the rectangle mousedown event is the way to
go.
With extensive searching, I have found a couple of examples which are
similar enough for me to get the functionality working- but they both only
work in excel, where I need them (and have spent days trying to get either of
them working) in access (2003/2007).
http://www.ozgrid.com/forum/showthread.php?t=46681
http://www.vbforums.com/showthread.php?t=412664
I am guessing the biggest problem is with the class declaration type that is
only relevant to excel userforms?? (from the 2nd example above):
Private WithEvents oOption As msforms.OptionButton
Any assistance will be greatly appreicated.
I have a form with a large, variable number of Rectangle controls (up to
200) which I want to reposition independantly with the mouse (I am actually
creating some ms project gantt chart functionality). I can handle the VBA
behind moving the controls with the mouse, and have got this working using
the seperate object events - but because of the large number of controls I am
guessing that a class module for the rectangle mousedown event is the way to
go.
With extensive searching, I have found a couple of examples which are
similar enough for me to get the functionality working- but they both only
work in excel, where I need them (and have spent days trying to get either of
them working) in access (2003/2007).
http://www.ozgrid.com/forum/showthread.php?t=46681
http://www.vbforums.com/showthread.php?t=412664
I am guessing the biggest problem is with the class declaration type that is
only relevant to excel userforms?? (from the 2nd example above):
Private WithEvents oOption As msforms.OptionButton
Any assistance will be greatly appreicated.