xlsm格式的文件以下代码不生效是什么原因？

atigerTGF · 发表于 2023-4-2 15:32

[color=rgba(0, 0, 0, 0.9)]各位大神，以下问题可以帮忙解答一下吗？谢谢！Excel2007.xlsm格式的文件以下代码不生效是什么原因？（其它文件的其它vba代码是可以执行的）Private Sub Workbook_BeforePrint(Cancel As Boolean)Cancel = TrueMsgBox "节约用纸拒绝打印", vbInformationEnd Sub

atigerTGF · 发表于 2023-4-2 15:33

Private Sub Workbook_BeforePrint(Cancel As Boolean)
Cancel = True
MsgBox "节约用纸拒绝打印", vbInformation
End Sub

taller · 发表于 2023-4-3 03:41

1. 代码应该保存在ThisWorkbook模块中
2. 用户打开文件时必须启用宏，否则代码没有任何用处

atigerTGF · 发表于 2023-4-3 09:29

taller 发表于 2023-4-3 03:41
1. 代码应该保存在ThisWorkbook模块中
2. 用户打开文件时必须启用宏，否则代码没有任何用处

这代码不能设置到单个sheet中？

taller · 发表于 2023-4-3 09:53

atigerTGF 发表于 2023-4-3 09:29
这代码不能设置到单个sheet中？

不需要在单个工作表中

atigerTGF · 发表于 2023-4-3 10:35

taller 发表于 2023-4-3 09:53
不需要在单个工作表中

好的，谢谢

		自动登录	找回密码
密码			免费注册

[求助] xlsm格式的文件以下代码不生效是什么原因？