導(dǎo)讀工作中用的excel表sheet太多了，隱藏可以批量進(jìn)行，但取消隱藏只能一個(gè)一個(gè)操作，真心效率好低。于是在網(wǎng)上學(xué)了一招：1.右鍵單擊任意工作表，然后左鍵單擊....

工作中用的excel表sheet太多了，隱藏可以批量進(jìn)行，但取消隱藏只能一個(gè)一個(gè)操作，真心效率好低。

于是在網(wǎng)上學(xué)了一招：

1.右鍵單擊任意工作表，然后左鍵單擊【查看代碼】選項(xiàng)，打開(kāi)Visual Basic編輯器。

2.新建一個(gè)模板并鍵入VBA代碼。首先右鍵單擊工程資源管理器窗口，然后依次選擇插入→模板。

3.將以下代碼復(fù)制粘貼到右側(cè)模板1的代碼窗口中。

Sub 一鍵批量取消工作表隱藏()

Dim sht As Worksheet

For Each sht In Worksheets

sht.Visible = xlSheetVisible

Next

End Sub

4.接著左鍵單擊菜單欄中的【運(yùn)行】選項(xiàng)，左鍵單擊下拉菜單中的【運(yùn)行子過(guò)程/用戶(hù)窗體】選項(xiàng)就可以批量取消隱藏工作表。

5.啟動(dòng)開(kāi)發(fā)工具，請(qǐng)依次點(diǎn)擊文件→選項(xiàng)→自定義功能區(qū)→在開(kāi)發(fā)工具前打上對(duì)勾→確定。

6.插入控件，依次點(diǎn)擊開(kāi)發(fā)工具→控件功能區(qū)→插入按鈕（窗體控件）。

7.在工作表區(qū)域長(zhǎng)按左鍵畫(huà)出一個(gè)大小合適的按鈕，在彈出的指定宏對(duì)話(huà)框中，左鍵單擊選中宏【一鍵批量取消工作表隱藏】并單擊確定按鈕，接著對(duì)按鈕重命名為取消隱藏工作表，方便后期知曉其功能。

8.現(xiàn)在大部分使用的是【*.xlsx】格式的Excel工作簿，接下來(lái)需要更改文件的存儲(chǔ)格式，否則會(huì)造成宏無(wú)法使用的情況。依次點(diǎn)擊文件→另存為→選擇存儲(chǔ)路徑。設(shè)置保存類(lèi)型為Excel97-2003工作簿(*xls)或者是Excel啟用宏的工作簿(*.xlsm)，最后左鍵單擊【保存】按鈕。

總結(jié)一下，功能很酷炫，真的很實(shí)用，效率極高，記得要啟用宏才行。但*.xlsx格式不支持，要么降版本（有些現(xiàn)有功能可能老版不支持），要么存為*.xlsm，可能是沒(méi)用慣，總看著奇奇怪怪的[捂臉][捂臉][捂臉]

怕影響領(lǐng)導(dǎo)看數(shù)據(jù)，最終決定還是手動(dòng)取消隱藏吧……[摳鼻][摳鼻][摳鼻]