EXCEL强制开启宏否则看不到全部工作表启用宏

作者:风筝 | 创建时间: 2023-06-13
EXCEL强制开启宏,否则只有一个欢迎界面,开启后正常...
EXCEL强制开启宏否则看不到全部工作表启用宏

操作方法

新建一个启用宏的工作薄

工作表启用宏

新建5个工作表,并制作一个欢迎界面,这个界面就是不开启宏显示的界面,,我们用sheet2演示

按alt+F11键,进入VBA编辑界面

将代码复制到工作薄内

代码:强制加载宏 Option Explicit Private Sub Workbook_BeforeClose(Cancel As Boolean) Sheets(2).Visible = -1 Sheets(2).Activate Sheets(4).Visible = 2 Sheets(3).Visible = 2 Sheets(1).Visible = 2 Sheets(5).Visible = 2 ThisWorkbook.Save End Sub Private Sub Workbook_Open() MsgBox "欢迎使用" Sheets(3).Visible = -1 Sheets(4).Visible = -1 Sheets(1).Visible = -1 Sheets(5).Visible = -1 Sheets(2).Activate Sheets(2).Visible = 2 End Sub

预览效果,演示为没有开启宏的状态,只有一个欢迎界面

点击展开全文

更多推荐