有時(shí)候我們不想讓人看見某張工作表的內(nèi)容,但是直接加密顯得很不禮貌,簡單設(shè)置、讓工作表格隱藏,很可能被發(fā)現(xiàn),為了避免尷尬,小編在這里教大家如何深度隱藏工作表吧
工具/材料
Excel軟件
操作方法
找到我們需要隱藏的其中一張工作表,這里我將其命名為‘要隱藏的工作表名’,將光標(biāo)移動(dòng)到開發(fā)工具,再移動(dòng)到左上方‘Visual Basic’,打開我們的VBE界面
來到VBE界面,在左側(cè)空白處右鍵,在彈出提示中選擇——插入——模塊,自動(dòng)跳轉(zhuǎn)到模塊編程界面
將以下代碼復(fù)制即可
Sub 隱藏()
Dim ws As Worksheet
Set ws = Worksheets("要隱藏的工作表名")
ws.Visible = xlSheetVeryHidden
End Sub
Sub 恢復(fù)可見()
Dim ws As Worksheet
Set ws = Worksheets("要隱藏的工作表名")
ws.Visible = xlSheetVisible
End Sub
點(diǎn)擊那個(gè)小三角運(yùn)行,跳出來選擇界面,選擇我們剛剛寫的隱藏那個(gè)小程序,點(diǎn)擊運(yùn)行就好了
關(guān)掉VBE回到我們工作表界面,工作表不見了,取消隱藏圖標(biāo)無法點(diǎn)擊,
到這里就結(jié)束了,需要恢復(fù)工作表時(shí),只需要再次打開VBE界面,找到我們新建的那個(gè)模塊,點(diǎn)擊運(yùn)行,選擇可見的那段代碼運(yùn)行即可
記得另存為XLSM哦,否則代碼不保存
聲明:本網(wǎng)頁內(nèi)容旨在傳播知識,若有侵權(quán)等問題請及時(shí)與本網(wǎng)聯(lián)系,我們將在第一時(shí)間刪除處理。TEL:177 7030 7066 E-MAIL:11247931@qq.com