ScrollArea屬性使用以A1樣式的區(qū)域引用形式(字符串類型)返回或設(shè)置工作表允許滾動的區(qū)域。當(dāng)設(shè)置了工作表滾動區(qū)域之后,用戶不能選定滾動區(qū)域之外的單元格,但仍然可以選定區(qū)域之外的其他對象(例如圖形、按鈕等),同時工作表的一些相應(yīng)功能可能被禁止(例如工作表全選、選中整行或整列等)。 在VBE中的工程管理窗口選擇相應(yīng)工作表對象,然后在其屬性窗口中設(shè)置ScrollArea屬性,即可限制工作表中滾動的區(qū)域,如圖所示。 但是Excel不會記憶該項設(shè)置,當(dāng)再次打開該工作簿時,ScrollArea屬性將被重置,用戶必須重新設(shè)置ScrollArea屬性才能限制工作表中的滾動區(qū)域,解決方法是使用代碼在工作簿打開時對ScrollArea屬性進行設(shè)置,如下面的代碼所示。 代碼: 復(fù)制代碼 代碼如下: #001 Private Sub Workbook_Open() #002 Sheet1.ScrollArea = 'B4:H12' #003 End Sub 代碼解析: 工作簿的Open事件,在打開該工作簿時設(shè)置Sheet1工作表的滾動區(qū)域為“B4:H12”單元格區(qū)域。 如果需要取消滾動區(qū)域的限制,可以將ScrollArea屬性值設(shè)置為空,如下面的代碼所示。 Sheet1.ScrollArea = '' |
|