View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
NickHK NickHK is offline
external usenet poster
 
Posts: 4,391
Default ScrollBar Linking/Synching.

The fact that the scroll bars are on different pages and/or frames etc
should not make any difference :

Private Sub ScrollBar1_Change()
ScrollBar2.Value = ScrollBar1.Value
End Sub

Private Sub ScrollBar2_Change()
ScrollBar1.Value = ScrollBar2.Value
End Sub

Ensure you do not create an endless loop though, by continually changing
both vales.

NickHK

"Rawce" wrote in message
oups.com...
All,

I'm currently having trouble trying to link two scrollbars that are
part of different frames on the same multitab of a form. Basically,
when one scrolls up/down, I want the other one to scroll up/down
accordingly (and for this to be invisible to the user).

My main problem is probably not being able to access any of the
properties of the scrollbars themselves. I've tried capturing the
ScrollBar1_Change event, but nothing happens. I've tried the following
code to at least loop through them all so I have some names to work
off, but it doesn't like the For Each line (object doesn't support this
property or method error):

Sub ScrollFinder()

Dim myScroll As ScrollBar
For Each myScroll In WeightForm
MsgBox myScroll.Name
Next

End Sub

How do I access the scrollbars that are part of a frame? I've tried
working through the objects (e.g.
WeightForm.Tabs.AMTab.AMAppTab.AMAppFrame2.ScrollB ar1.Name) but none of
it seems to work. Are there issues with programmatically changing
scrollbars that are part of a frame/multitab?

Many thanks for any help you can offer,

Ross.