亚洲高清vr播放在线观看,欧美亚洲精品免费,欧美日韩天堂在线视频,午夜福利小视频

      學(xué)習(xí)啦>學(xué)習(xí)電腦>工具軟件>辦公軟件學(xué)習(xí)>Excel教程>Excel表格>

      excel表格怎樣設(shè)置隱藏所有工作表

      時間: 宇能938 分享

        excel中很多工作表機(jī)密性比較大,想要隱藏起來,該怎么隱藏呢?一個一個隱藏太慢,如何將所有工作表一起隱藏,下面就跟學(xué)習(xí)啦小編一起學(xué)習(xí)excel表格隱藏所有工作表的方法。

        excel表格隱藏所有工作表的方法

        1、首先我們打開一個工作樣表作為例子。

        2、使用alt+f11組合鍵打開vbe編輯器,新建一個模塊,在模塊編輯窗中輸入以下代碼:

        Option Explicit

        Sub 隱藏()

        Dim i As Integer

        For i = 1 To Sheets.Count

        If Sheets(i).Name <> "源數(shù)據(jù)" Then

        Sheets(i).Visible = 0

        End If

        Next x

        End Sub

        3、解讀這段代碼首先是要了解工作表的名稱規(guī)則是默認(rèn)的以數(shù)字順序遞增,按工作表的順序依次是sheets1、sheets2、……直到最末尾一個工作表。因此我們這里定義一個for循環(huán),起始值為1,終值為工作表數(shù)。

        4、接著我們對工作表名做判斷。工作表出了下標(biāo)值,也就是上步提到的順序命名,還可以自定義名稱,也就是我們這里寫的"源數(shù)據(jù)"。<>大于小于判斷符為不等于。

        5、visible屬性是可視屬性,作為表格對象的屬性即是可視或隱藏。這里寫做0即是隱藏,我們可以用更直觀的寫法false。

        6、制作一個按鈕并指定這個宏,我們運行一下,可以看到除了源數(shù)據(jù)工作表外,其他的工作表都隱藏起來了,如果需要回復(fù),只需要將宏代碼中visible的屬性值0修改為1或者true然后運行即可。


      猜你感興趣:

      1.excel怎么隱藏所有工作表

      2.Excel怎么對工作表進(jìn)行隱藏與顯示

      3.Excel怎樣隱藏與顯示工作表的行或列

      4.怎么隱藏excel2013中的工作表

      5.如何隱藏excel工作表的教程

      2593146