Microsoft Office Tutorials and References
In Depth Information
Zooming and Scrolling a Sheet from a UserForm
.LargeChange = 10
.Value = ActiveWindow.Zoom
End With
‘ Horizontally scrolling
With ScrollBarColumns
.Min = 1
.Max = ActiveSheet.UsedRange.Columns.Count
.Value = ActiveWindow.ScrollColumn
.LargeChange = 25
.SmallChange = 1
End With
‘ Vertically scrolling
With ScrollBarRows
.Min = 1
.Max = ActiveSheet.UsedRange.Rows.Count
.Value = ActiveWindow.ScrollRow
.LargeChange = 25
.SmallChange = 1
End With
End Sub
Figure 14-7: Here, ScrollBar controls allow zooming and scrolling of the worksheet.
 
Search JabSto ::




Custom Search