通過(guò)VBA編程怎么實(shí)現(xiàn)Excel工作簿只顯示指定工作表
當(dāng)Excel工作簿中有多個(gè)工作表時(shí),有時(shí)希望只顯示當(dāng)前正在操作的工作表,可以通過(guò)VBA編程來(lái)實(shí)現(xiàn)讓Excel工作簿只顯示指定的工作表。以下是學(xué)習(xí)啦小編為您帶來(lái)的關(guān)于通過(guò)VBA編程實(shí)現(xiàn)Excel工作簿只顯示指定工作表,希望對(duì)您有所幫助。
通過(guò)VBA編程實(shí)現(xiàn)Excel工作簿只顯示指定工作表
1、啟動(dòng)Excel并打開(kāi)Visual Basic編輯器,在工程資源管理器中雙擊"ThisWorkbook"選項(xiàng)打開(kāi)其“代碼”窗口,在其中輸入程序代碼,如圖1所示。具體的程序代碼如下所示:
Private Sub Workbook_Open()
Dim sht As Worksheet
For Each sht In Me.Worksheets
If Not sht Is Worksheets("主界面")Then sht.Visible=xlSheetHidden
Next
End Sub
圖1 在“代碼”窗口中輸入程序代碼
提示:在程序中,首先定義一個(gè)名為sht的工作表對(duì)象,使用For Each……In結(jié)構(gòu)遍歷工作簿中所有的工作表,判斷當(dāng)前工作表是否是“主界面”工作表,如果不是則將其隱藏。
2、切換到Excel,保存文檔。當(dāng)再次打開(kāi)文檔時(shí),工作表中將只保留指定的界面,如圖2所示。
圖2 工作簿只顯示“主界面”工作表
猜你喜歡:
2.Excel中使用VBA制作一個(gè)惡作劇小程序的操作方法