VBA Workbook_open 不起作用（安全级别设到最低了）
我在第一个sheet里面写了代码。请指教，为什么不起作用。打开文件的时候没有探出来1的msgbox，设置也没有生效。PrivateSubWorkbook_Open()Ms...
我在第一个sheet里面写了代码。请指教，为什么不起作用。打开文件的时候没有探出来1的msgbox，设置也没有生效。
Private Sub Workbook_Open()
MsgBox "1"
With Application
.ScreenUpdating = False
.DisplayAlerts = False
.Calculation = xlManual
.MaxChange = 0.001
.CalculateBeforeSave = False
End With
End Sub
Private Sub Workbook_Close()
MsgBox "2"
With Application
.ScreenUpdating = True
.DisplayAlerts = True
.Calculation = xlAutomatic
.MaxChange = 0.001
.CalculateBeforeSave = True
End With
ThisWorkbook.Close
End Sub 展开
Private Sub Workbook_Open()
MsgBox "1"
With Application
.ScreenUpdating = False
.DisplayAlerts = False
.Calculation = xlManual
.MaxChange = 0.001
.CalculateBeforeSave = False
End With
End Sub
Private Sub Workbook_Close()
MsgBox "2"
With Application
.ScreenUpdating = True
.DisplayAlerts = True
.Calculation = xlAutomatic
.MaxChange = 0.001
.CalculateBeforeSave = True
End With
ThisWorkbook.Close
End Sub 展开
展开全部
代码不是打在sheet里面的，而是要打在VBA里。
操作方法：
Alt+F11，打开VBA窗口，双击左边的“ThisWorkook”，在右边的对象中选择“Workbook”，然后把代码复制到此过程中。
操作方法：
Alt+F11，打开VBA窗口，双击左边的“ThisWorkook”，在右边的对象中选择“Workbook”，然后把代码复制到此过程中。
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
微测检测5.10
2023-07-11 广告
IEC62133与en62133的区别如下：1. 认证机构不同：IEC62133是国际的标准，它以国际通用的标准进行生产；而en62133采用的是欧盟的标准，它使用欧盟的生产需求进行生产。2. 宗旨不同：IEC62133的宗旨是促进电气、电...
点击进入详情页
本回答由微测检测5.10提供
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
