借用高手的模板做的一个表格，权限设置不听使唤了啊。明明设置能打开却显示没有权限

doubler2011 · 发表于 2013-12-20 12:49

kuangben8 · 发表于 2013-12-20 12:57

上传附件或者截图看看是什么情况。

在ExcelHome技术论坛的最佳学习方法
http://club.excelhome.net/thread-117862-1-1.html

doubler2011 · 发表于 2013-12-26 14:00

Sub G2()
If Sheets("a").[i30] = 1 Then
ActiveWorkbook.Unprotect Password:="680127"
Sheets("表2").Visible = True
Sheets("表2").Activate
ActiveWindow.DisplayHeadings = False
ActiveWorkbook.Protect Password:="680127"
Else
MsgBox "您没有此项权限！" & Chr(13) & Chr(13) & "请与管理员联系获得权限！", 48, "〖鼎顺处理系统〗-提示"
End If
End Sub

是不是代码不正确？ QQ截图20131226135920.jpg

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

借用高手的模板做的一个表格，权限设置不听使唤了啊。明明设置能打开 却显示没有权限

借用高手的模板做的一个表格，权限设置不听使唤了啊。明明设置能打开却显示没有权限