限制工作表捲動範圍

    限制工作表捲動範圍，參造以下程式碼

Sub 限制工作表捲動範圍()

   Worksheets(1).ScrollArea = "B4:H12"

End Sub

以上程式可使第一張工作表的可捲動範圍設定B4到H12，ScrollArea=””則可取消限制捲動範圍

    如果要限制可捲動範圍為使用中視窗的可視範圍，則用以下程式碼達成

Sub 捲動範圍為可視範圍()

   With Sheet1

        .Activate

        .ScrollArea = ActiveWindow.VisibleRange.Address

   End With

End Sub

ScrollArea屬性設定為使用中視窗的可視範圍位址