怎样使用VBA禁止查看某表以外的工作表

1、首先在开发工具中打开VBA编辑器

2、在单元格区域当中输入一些内容作为例子

3、在VBA编辑器中插入模块

4、在模块当中输入如下代码，然后运行Private Sub Workbook_Open猾诮沓靥() Application.OnKey "^{BREAK}", "稆糨孝汶;" ’ 禁止中断程序 Dim sht As Worksheet For Each sht In ThisWorkbook.Sheets If sht.Name="人事出勤表" Then sht.Visible=True Else sht.Visible=xlSheetVeryHidden '隐藏工资表 End If Next shtEnd Sub

5、重新启动工作簿，工作簿中仅剩下“人事出勤表”，其他表格完全隐藏起来