久久国产成人av_抖音国产毛片_a片网站免费观看_A片无码播放手机在线观看,色五月在线观看,亚洲精品m在线观看,女人自慰的免费网址,悠悠在线观看精品视频,一级日本片免费的,亚洲精品久,国产精品成人久久久久久久

分享

VBA常用小代碼:批量取消隱藏工作表

 hercules028 2019-06-15

我們今天分享的內(nèi)容是批量取消隱藏工作表,,來看看操作過程:

按住Ctrl鍵,,點擊鼠標(biāo)分別選取需要隱藏的工作表標(biāo)簽(如果需要隱藏是連續(xù)的工作表,,也可以先選取首個工作表標(biāo)簽,按住Shift鍵,,選取末位工作表標(biāo)簽進(jìn)行批量選?。怪蔀橐粋€工作表組合,,然后使用右鍵菜單的【隱藏】功能,,就可以將該工作表組合中的工作表一次性隱藏起來~

可是,反過來,,如果一個工作薄的部分工作表隱藏了,,需要批量取消, EXCEL就沒有提供這樣的功能了,,就需要我們一個一個去進(jìn)行手工操作,。

右鍵單擊任意工作表標(biāo)簽,在右鍵菜單中,,選擇【取消隱藏工作表】,,在彈出的對話框中,選擇相應(yīng)的表名,,點擊【確定】完成,。

如果需要取消隱藏的工作表很多,這樣操作就很煩瑣,,很明顯,,這很不符合您一向高效快捷的工作作風(fēng)。

如何一次性全部取消隱藏工作表呢,?有一個技巧是通過預(yù)先設(shè)置【自定義視圖】,,但依然有很大的局限性,這里不提也罷,。

其實這事兒幾行VBA小代碼就可以搞定了:

Sub qxyc()
    Dim sht As Worksheet
   
'定義變量
    For Each sht In Worksheets
    '
循環(huán)工作簿里的每一個工作表
        sht.Visible = xlSheetVisible
       
'將工作表的狀態(tài)設(shè)置為非隱藏
    Next
End Sub

順手配個操作動畫:


代碼一兩行,,工作不用忙斷腸,說的就是這種情況了,。您也動手試一下吧,。

    本站是提供個人知識管理的網(wǎng)絡(luò)存儲空間,所有內(nèi)容均由用戶發(fā)布,,不代表本站觀點,。請注意甄別內(nèi)容中的聯(lián)系方式,、誘導(dǎo)購買等信息,謹(jǐn)防詐騙,。如發(fā)現(xiàn)有害或侵權(quán)內(nèi)容,,請點擊一鍵舉報。
    轉(zhuǎn)藏 分享 獻(xiàn)花(0

    0條評論

    發(fā)表

    請遵守用戶 評論公約

    類似文章 更多