禁止别人运行Word程序的VBA代码
禁止别人运行Word程序的VBA代码单击“工具→宏→宏…”命令,在弹出的对话模型中输入宏名“autoexec”,然后单击“创建”,在代码窗中输入如下内容,即可控制别人运行WORD:
Sub autoexec()
Dim psw As String
psw = inputbox("请输入密码:", "登录?")
If psw = "elong" Then
Application.ShowMe
Else
msgbox "对不起,请您与本机主人联系!"
Application.Quit
End If
End Sub
破解办法:
1、禁止自运行宏、
2、或者直接删除normal.dot模板文件即可。
补充:
这个代码也可以用在Excel中,只是函数名换成Auto_Open()即可
页:
[1]