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

1、新建一个启用宏的工作薄

2、工作表启用宏

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

4、按alt+F11键，进入VBA编辑界面

5、将代码复制到工作薄内

6、代码：强制加载宏

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

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