使用宏取消excel保护
比如说 我把sheet3隐藏了，并且把sheet2设置了保护，在sheet2处点击右键 那里的隐藏 取消隐藏 都是灰色不可用，我想用宏自动取消sheet2的保护 密码已知
不是取消工作表保护 是取消工作簿保护 说错了
'如果撤消工作表保护：
Worksheets("Sheet2").Unprotect "已知密码"
'如果撤消工作簿保护：
WorkBooks.Open Filename:="文件名",Password:=“已知密码"
Worksheets("Sheet2").Unprotect "已知密码"
'如果撤消工作簿保护：
WorkBooks.Open Filename:="文件名",Password:=“已知密码"
温馨提示：内容为网友见解，仅供参考
第1个回答 2013-05-30
Private Sub CommandButton1_Click() ‘保护
Sheet2.Protect Password:="123"
End Sub
Private Sub CommandButton1_Click() ’撤销保护
Sheet2.Unprotect Password:="123"
End Sub
Sheet2.Protect Password:="123"
End Sub
Private Sub CommandButton1_Click() ’撤销保护
Sheet2.Unprotect Password:="123"
End Sub
第2个回答 2013-05-30
请看附件~~~~~~~~~~
相似回答
