1.先在工作表中建立分级显示。2.按Alt+F11,打开VBA编辑器,在“工程”窗口中双击“ThisWorkbook”,在代码窗口中输入下列代码:Private Sub Workbook_Open()With Worksheets("Sheet1").EnableOutlining = True .Protect Password:="123", userInterfaceOnly:=True End With End Sub 说明:假设工作表名称...
1 在excel2013中创建一个工作表和数据区域 2 选中需要创建分组的行,通过【数据】菜单上【创建组】来创建分组,分组创建完毕后可以通过左侧“+”“-”号来折叠或者展开分组数据 3 点选数据区域,设置单元格属性取消保护 4 点击【审阅】菜单上的保护工作表,对并作表进行保护,并设定密码,此时发现在工作表上已经...
1.先在工作表中建立分级显示。 2.按Alt+F11,打开VBA编辑器,在“工程”窗口中双击“ThisWorkbook”,在代码窗口中输入下列代码: Private Sub Workbook_Open() With Worksheets("Sheet1") .EnableOutlining = True .Protect Password:="123", userInterfaceOnly:=True End With End Sub 说明:假设工作表名称为“Sheet...
1.先在工作表中建立分级显示。 2.按Alt+F11,打开VBA编辑器,在“工程”窗口中双击“ThisWorkbook”,在代码窗口中输入下列代码: Private Sub Workbook_Open()With Worksheets("Sheet1").EnableOutlining = True.Protect Password:="123", userInterfaceOnly:=TrueEnd WithEnd Sub 说明:假设工作表名称为“Sheet1”,上...