excel vba 限制工作表的滾動區(qū)域代碼
更新時間：2009年07月15日 19:26:42 作者：
如果希望限制工作表中滾動的區(qū)域，可以通過設(shè)置WorkSheet對象的ScrollArea屬性來實現(xiàn)。
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屬性進(jìn)行設(shè)置，如下面的代碼所示。
代碼:
#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 = ""
在VBE中的工程管理窗口選擇相應(yīng)工作表對象，然后在其屬性窗口中設(shè)置ScrollArea屬性，即可限制工作表中滾動的區(qū)域，如圖所示。
但是Excel不會記憶該項設(shè)置，當(dāng)再次打開該工作簿時，ScrollArea屬性將被重置，用戶必須重新設(shè)置ScrollArea屬性才能限制工作表中的滾動區(qū)域，解決方法是使用代碼在工作簿打開時對ScrollArea屬性進(jìn)行設(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 = ""
您可能感興趣的文章:
- VBA中操作Excel常用方法總結(jié)
- Excel VBA連接并操作Oracle
- excel vba 高亮顯示當(dāng)前行代碼
- 合并Excel工作薄中成績表的VBA代碼，非常適合教育一線的朋友
- 用vba實現(xiàn)將記錄集輸出到Excel模板
- Python + selenium + requests實現(xiàn)12306全自動搶票及驗證碼破解加自動點擊功能
- python requests包的request()函數(shù)中的參數(shù)-params和data的區(qū)別介紹
- python:解析requests返回的response(json格式)說明
- 基于python requests selenium爬取excel vba過程解析
相關(guān)文章
VBA 中要用到的常數(shù)...2007-02-02
本文主要介紹了VBA中Excel宏的介紹及應(yīng)用，文中通過示例代碼介紹的非常詳細(xì)，對大家的學(xué)習(xí)或者工作具有一定的參考學(xué)習(xí)價值，需要的朋友們下面隨著小編來一起學(xué)習(xí)學(xué)習(xí)吧2023-05-05
可用 ProtectedRange 對象的 Users 屬性返回一個 UserAccessList 集合。2009-07-07
可用 Application 對象的 UsedObjects 屬性返回一個 UsedObjects 對象。2009-07-07
當(dāng)編輯框內(nèi)容改變 對應(yīng)的單元格也隨著改變vba代碼
當(dāng)編輯框內(nèi)容改變 對應(yīng)的單元格也隨著改變vba代碼2009-07-07
VBA處理數(shù)據(jù)與Python Pandas處理數(shù)據(jù)案例比較分析
這篇文章主要介紹了VBA處理數(shù)據(jù)與Python Pandas處理數(shù)據(jù)案例比較,本文通過實例代碼給大家介紹的非常詳細(xì)，具有一定的參考借鑒價值，需要的朋友可以參考下2020-04-04
如果希望限制工作表中滾動的區(qū)域，可以通過設(shè)置WorkSheet對象的ScrollArea屬性來實現(xiàn)。2009-07-07
關(guān)于vba代碼運行時錯誤1004?應(yīng)用程序定義或?qū)ο蠖x錯誤問題
這篇文章主要介紹了vba代碼運行時錯誤1004?應(yīng)用程序定義或?qū)ο蠖x錯誤,經(jīng)過一系列問題調(diào)查發(fā)現(xiàn)是工作表中數(shù)據(jù)存在異常，需要的朋友可以參考下2022-10-10
要想一下子就替換掉很多個WORD文檔中的內(nèi)容,我們可以使用VBA的辦法,本文主要介紹了VBA實現(xiàn)全文件快速替換的示例代碼,具有一定的參考價值,感興趣的可以了解一下2023-08-08
VBA數(shù)組去重(字典去重多種方法+數(shù)組去重2種方法)
本文主要介紹了VBA數(shù)組去重(字典去重多種方法+數(shù)組去重2種方法),文中通過示例代碼介紹的非常詳細(xì),對大家的學(xué)習(xí)或者工作具有一定的參考學(xué)習(xí)價值,需要的朋友們下面隨著小編來一起學(xué)習(xí)學(xué)習(xí)吧2023-08-08