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