excel怎么使用vba一鍵隱藏所有工作表?
excel中使用vba一鍵隱藏所有工作表

Excel2003綠色版 EXCEL2003精簡(jiǎn)綠色版 (附excel2003綠色工具)
- 類(lèi)型:辦公軟件
- 大?。?/span>13.3MB
- 語(yǔ)言:簡(jiǎn)體中文
- 時(shí)間:2012-06-19

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)行即可。


相關(guān)推薦:
excel編輯欄怎么不顯示公式?excel隱藏編輯欄公式的方法
相關(guān)文章
- excel怎么將表格中的美元轉(zhuǎn)換為人民幣?excel表格中全是美元,想將美元全部轉(zhuǎn)換成人民不,該怎么轉(zhuǎn)換呢?下面我們就來(lái)看看詳細(xì)的教程,需要的朋友可以參考下2016-08-14
- 這篇教程是向腳本之家介紹excel vba編程在窗體上畫(huà)微波爐方法,方法很簡(jiǎn)單的,有需要的朋友可以參考本文,希望能對(duì)大家有所幫助2016-08-12
- 這篇教程主要是向腳本之家的朋友分享利用excel vba編程在窗體上畫(huà)手提電腦方法,教程比較基礎(chǔ),適合新手來(lái)學(xué)習(xí),推薦到腳本之家,喜歡的朋友可以參考本文哦2016-08-10
excel怎么利用vba函數(shù)給表格區(qū)域添加綠框?
excel怎么利用vba函數(shù)給表格區(qū)域添加綠框?excel表格中有重要的數(shù)據(jù),想將數(shù)據(jù)框起來(lái)更扎眼,該怎么做呢?下面我們就來(lái)看看詳細(xì)的教程,需要的朋友可以參考下2016-08-10excel怎么使用vba實(shí)現(xiàn)箱號(hào)換散鞋模板的功能?
excel怎么使用vba實(shí)現(xiàn)箱號(hào)換散鞋模板的功能?經(jīng)常需要將整箱的鞋子換成散鞋,該怎么換呢?今天我們就來(lái)看看使用excel制作散箱號(hào)換散鞋模板的教程,需要的朋友可以參考下2016-08-10- 今天小編為大家分享excel vba編程畫(huà)一只小蜜蜂方法,教程繪制出來(lái)的小蜜蜂非常不錯(cuò),方法很簡(jiǎn)單,感興趣的朋友可以參考本文,來(lái)看看吧2016-08-09
- 今天小編為大家分享利用excel vba編程在窗體上畫(huà)椅子方法,教程比較不錯(cuò),也很簡(jiǎn)單,適合新手來(lái)學(xué)習(xí),推薦過(guò)來(lái),來(lái)看看吧2016-08-05
- excel表格怎么利用vba自動(dòng)填充公式?excel表格中需要使公式計(jì)算,該怎么讓表格自動(dòng)填充公式呢?下面我們就來(lái)看看使用vba自動(dòng)填充公式的教程,需要的朋友可以參考下2016-08-02
- 今天小編為大家分享利用excel vba編程在窗體上畫(huà)一顆六角星方法,教程比較不錯(cuò),對(duì)于有興趣的朋友可以參考本文,來(lái)看看吧2016-08-02
Excel VBA教程 Excel多個(gè)表格匯總的方法教程
如果你每天的工作都是把分表格匯總到總表中,那你肯定需要下面我要教給你的這個(gè):用VBA批量把每天的各種表格匯總成一張總表,再也不用每張表格的復(fù)制粘貼了2016-08-01

