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

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

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

　　1、首先我們打開(kāi)一個(gè)工作樣表作為例子。

　　2、使用alt+f11組合鍵打開(kāi)vbe編輯器，新建一個(gè)模塊，在模塊編輯窗中輸入以下代碼：

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

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

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

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