我只想顯示該區域的指定部分,其余部分設置為隱藏。在過去,我可能會多次使用行隱藏和列隱藏的命令。作為辦公室主人,我們可以用VBA代碼一次隱藏選定連續區域之外的所有區域。這不是一個可以完全做到的笑話。但是,應該注意的是,WPS默認情況下是在沒有VBA環境的情況下安裝的,不能使用宏功能。為了實現上述功能,VBA需要單獨安裝。好的,開始下面的教程,想快速操作的朋友可以關注一下。
第一步是制作一份文件。
打開WPS表單2009(在線文檔公共測試版),創建一個新的空白文檔,并在某些區域輸入數字作為使用區域。
第2步,單擊工具-宏-創建新宏。
步驟3:在Microsoft Visual Basic中輸入或復制以下代碼。
子隱藏當前范圍()將第一個單元格設為范圍,最后一個單元格設為范圍,如果沒有選擇,則不顯示任何內容,然后選擇當前所選區域中的第一個單元格設置第一個單元格。細胞(1)
當前選定區域的最后一個單元格
設置CelLast=。單元格(.單元格.計數)
以結尾
如果CelFirst。地址’ $ a1 $那么
藍色區域
帶范圍([a1],單元格優先。偏移(IIf)(CelsFirst。行=1,0,-1),IIf(CelsFirst)。列=1,0,-1))
如果當前選定的區域不包括第一行,則藍色區域所在的行將被隱藏
如果CelFirst。第1行,然后。整個隱藏=真
如果當前選定的區域不包括第一列,如果是第一列,則隱藏藍色區域所在的列。那么列1。整列。隱藏=真
以結尾
結束如果
如果CelLast。地址’ $靜脈$65536 ‘那么
像上面一樣對待綠色區域。
帶范圍(CelLast。偏移(IIf)(CellAst。Row=65536,0,1),IIf(CelLast)。列=256,0,1)),
[IV65536])如果細胞死亡。第65536行,然后整行。隱藏=真
如果CelLast。第256列,然后。整個列。隱藏=真
以結尾
結束如果
結束如果
末端接頭
第四步是執行“視圖-工具-控制工具箱”,點擊“按鈕”,選擇一個合適的位置插入一個暫停的“隱藏”按鈕,并給它分配一個HiddenSurroundRange宏。第五步:選擇使用區域,點擊“隱藏”按鈕,一次隱藏使用區域以外的所有區域。
WPS在小提示:的默認安裝沒有VBA環境,不能使用宏功能。為了實現教程中描述的功能,VBA需要單獨安裝。WPS辦公在線文檔的公開測試版可以共享文檔。只要有郵箱,VBA文件就可以共享,避免了搜索和下載的痛苦。此外,因為在示例中使用了“宏”,所以在打開文件時應該啟用該宏。