当Excel工作簿中有多个工作表时,有时希望只显示当前正在操作的工作表。本文介绍通过VBA编程来实现让Excel工作簿只显示指定的工作表的方法。
1、启动Excel并打开Visual Basic编辑器,在工程资源管理器中双击"ThisWorkbook"选项打开其“代码”窗口,在其中输入程序代码,如图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 在“代码”窗口中输入程序代码
提示:在程序中,首先定义一个名为sht的工作表对象,使用For Each……In结构遍历工作簿中所有的工作表,判断当前工作表是否是“主界面”工作表,如果不是则将其隐藏。
2、切换到Excel,保存文档。当再次打开文档时,工作表中将只保留指定的界面,如图2所示。
图2 工作簿只显示“主界面”工作表