應(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)技能#
推薦閱讀
- 夢(mèng)到了被逮捕進(jìn)監(jiān)獄 夢(mèng)到了被逮進(jìn)監(jiān)獄啥意思
- 200乘230的被子是多大的 1.8米床用200*230被子夠嗎
- 夢(mèng)到了牛被我殺死后流了好多血 夢(mèng)到了牛被我殺死后流了好多血什么意思
- 夢(mèng)到了自己犯罪被親人捉進(jìn)監(jiān)獄 夢(mèng)到了自己犯罪被親人捉進(jìn)監(jiān)獄了
- 飛機(jī)發(fā)動(dòng)機(jī)齒輪箱和主起落架被發(fā)現(xiàn)
- 夢(mèng)到了被關(guān)進(jìn)監(jiān)獄 夢(mèng)到了被關(guān)進(jìn)監(jiān)獄是什么意思
- 潔婷廣告被指侮辱女性公司道歉
- 表格忘記保存怎么恢復(fù) excel表格忘記保存怎么恢復(fù)
- 夢(mèng)到了老公被打沒有出血 夢(mèng)到了老公被打沒有出血什么意思
- 夢(mèng)到了下雨橋被沖毀 夢(mèng)到了下雨橋被沖毀什么意思
