Set scrollbars to a default starting position when a userform is initialized

[Big_E]

Hi all,

I am only a few months into VBA and I am trying to incorporate my first multipage control in a userform. I have both vertical and horizontal scrollbars and have gotten them to scroll properly by setting the scroll height and scroll width properties in the property window. My issue now is getting them to start at the zero position (ScrollTop & Scroll Left) when the userform is initialized. I have written a procedure under the userform set to run when it initializes to set both properties to zero but that didn't work. (Me.ScrollTop = 0 Me.ScrollLeft = 0). Each time I initialized the userform the scrollbars started in the position they were left in the last time the userform was initialized.

How can I start both scrollbars at the zero position when the userform is initialized?

Thanks in advance!!

[MarvinP]

Hi Big_E and welcome to the forum,

This sounds like you need to Unload the userform instead of close or hide. Read
http://support.microsoft.com/kb/213744

[Big_E]

Ahhhh.....silly me!! I didn't think about that. I will try that. Thank you very much!

[Big_E]

MarvinP,

I tried your suggestion but that didn't resolve my issue. I created a command button in my form and assigned a macro to unload the form which took me to the active tab in my workbook. On that spreadsheet I inserted a button and assigned a macro to show the userform. As in my initial post I wrote code under the userform to set the positions when the userform is initialized. I clicked the button in my spreadsheet to show the userform, which it did. Then moved the scrollbars and clicked the button in the form to unload the form, which it did. When I clicked the button in my spreadsheet to show the form the scrollbars were where I left them. What did I do wrong? What am I missing?

[mikerickson]

You could explicitly set the .ScrollTop and .ScrollLeft properties of the MultiPage's Pages in the Intialize event.

Your Me.ScrollTop sets the user form's .ScrollTop property. Each Page has its own .ScrollTop property.

Througout a userform's code module, the Me keyword refers to the Userform.

[Big_E]

Hi Mike,

Thanks for your response. Like I said earlier I am still fairly new to VBA. How do I do that?

[mikerickson]

I would do something like this. This code assumes there is MultiPage1, myVerticalScrollBar and myHorizontalScrollBar. It accommodates lots of control on various pages in various locations.

Please Login or Register  to view this content.