PDA

View Full Version : Solved: scrollbar zoom



av8tordude
08-21-2011, 07:04 AM
i have this code in a userform scroll bar that adjust the zoom. When I display the userform, how can I display the sliding bar to the correct position relative to the screen zoom?

for example, if the screen resolution is 50%, the scroll bar position should be in the middle of the sliding area.

Private Sub ScrollBar1_Change()
With ActiveWindow
.Zoom = ScrollBar1.Value
Zoom = .Zoom & "%"
End With
End Sub

Bob Phillips
08-21-2011, 08:15 AM
I showed you that in your last post on this topic.

av8tordude
08-21-2011, 12:12 PM
XLD,

Disregard...I missed it. Thanks