日本免费全黄少妇一区二区三区-高清无码一区二区三区四区-欧美中文字幕日韩在线观看-国产福利诱惑在线网站-国产中文字幕一区在线-亚洲欧美精品日韩一区-久久国产精品国产精品国产-国产精久久久久久一区二区三区-欧美亚洲国产精品久久久久

表格被隱藏的弄不出來 隱藏表格怎么全部顯示出來

應(yīng)用場(chǎng)景下圖工作簿中一共有七張工作表 , 目前只顯示了第一張工作表“表1”,還有六張工作表“表2”至“表7”被隱藏 。這篇文章就跟大家分享如何利用VBA代碼將隱藏的六張工作表批量顯示出來 。

表格被隱藏的弄不出來 隱藏表格怎么全部顯示出來


操作步驟1.單擊窗口上方“開發(fā)工具”選項(xiàng)卡“代碼”功能組中的“Visual Basic”按鈕,打開VBA編輯器窗口 。
表格被隱藏的弄不出來 隱藏表格怎么全部顯示出來



表格被隱藏的弄不出來 隱藏表格怎么全部顯示出來


2.執(zhí)行“插入”—“模塊”命令,此時(shí)在窗口左側(cè)列表中會(huì)增加一個(gè)用于存放編寫代碼的“模塊1”,同時(shí)在右側(cè)會(huì)看到模塊1(代碼)編輯窗口 。
表格被隱藏的弄不出來 隱藏表格怎么全部顯示出來



表格被隱藏的弄不出來 隱藏表格怎么全部顯示出來


3.在模塊1(代碼)編輯窗口中輸入如下代碼:
Sub 取消工作表隱藏()
Dim sht As Worksheet
'定義變量
For Each sht In Worksheets
'循環(huán)工作簿里的每一個(gè)工作表
sht.Visible = xlSheetVisible
'將工作表的狀態(tài)設(shè)置為非隱藏
Next
End Sub
表格被隱藏的弄不出來 隱藏表格怎么全部顯示出來


4.代碼輸入完畢后,單擊VBA編輯器窗口上方的“運(yùn)行子過程/用戶窗體”按鈕(方向向右的綠色三角形)運(yùn)行代碼 。
表格被隱藏的弄不出來 隱藏表格怎么全部顯示出來


【表格被隱藏的弄不出來 隱藏表格怎么全部顯示出來】5.返回工作表,可見窗口下方多了“表2”到“表7”六個(gè)工作表標(biāo)簽,代表被隱藏的工作表已經(jīng)全部被顯示出來了 。
表格被隱藏的弄不出來 隱藏表格怎么全部顯示出來


#職場(chǎng)技能#

    推薦閱讀