【发布时间】:2018-09-14 22:37:19
【问题描述】:
我有下面的代码,我想保护几乎所有东西,它工作正常,但我想修改它,允许用户运行复制到另一张表的 makro。如果我将宏运行到受保护的工作表,则会出现错误。
我希望你们能帮助并感谢你们:)
Sub Workbook_Open()
Application.ScreenUpdating = False
For Each ws In Sheets
With ws
.Unprotect Password:="MKM"
.Protect Password:="MKM", UserInterfaceOnly:=True
.EnableOutlining = True
End With
Next ws
Application.ScreenUpdating = True
End Sub
【问题讨论】:
-
这可以保护打开的工作簿上的每个工作表。您希望实际执行复制的宏解锁相关工作表并在最后再次锁定它。
-
我希望它保护所有工作表 - 如果我希望它不受保护然后再次受到保护,我应该怎么做,只有当我使用宏进行复制时?先生,你之前的代码 - 那是我想要使用的代码:)
-
现在可以正常使用了,谢谢 :)
标签: excel vba password-protection copying