摘要： Excel中的分级显示（组合）功能可以让表格中的某些数据按组别进行显示或隐藏，十分方便。但在保护工作表后，无法直接使用分级显示。如果既要保护工作表，又要让用户能使用已建立的分级显示，可以用下面的方法。
1.先在工作表中建立分级显示。
2.按Alt F11，打开VBA编辑器，在“工程”窗口中双击“ThisWorkbook”，在代码窗口中输入下列代码：
excel VBA按字母表顺序对工作表进行排序
如果工作簿内有大量以字母开头的工作表，要将这些工作表按照字母表的顺序进行排序，可以用下面的VBA代码来实现。按Alt F11，打开VBA编辑器，单击菜单“插入→模块”，在代码窗口中粘贴下列代码并执行。 Sub 按字母表排序工作表()Dim i As Integer, j As Inte
Private Sub Workbook_Open()
With Worksheets("Sheet1")
.EnableOutlining = True
.Protect Password:="123", userInterfaceOnly:=True
End With
End Sub
说明：假设工作表名称为“Sheet1”，上述代码对该工作表进行保护，并设置的密码为“123”。如果之前已对工作表设置了密码保护，需确保两处的密码一致。
3.根据需要设置VBA保护密码。
最后保存工作簿。这样，用户打开受保护的工作表后就可以使用已创建的分级显示了。
Excel2007中输入事件处理程序的VBA代码
每个事件处理程序必须存放在特定类型的代码模块中。工作簿级别事件的代码应该放在ThisWorkbook代码模块中，工作表级别事件的代码应该放在特定工作表的代码模块中(例如，命名为Sheet1的代码模块)。 此外，每个事件处理程序都有预先确定的名称。可以通过键入名称来声明过程，但是更好的方法是让VB编辑器做这项工作。如图显
