从其他VBA编辑受保护的工作表

我正在使用Excel编写登录簿，并使用VBA进行编码。我有一个带有表单的选项卡来输入您的信息，另一个用于在登录时存储详细信息，还有一个用于搜索登录用户。我已经保护了Sheet1（登录），还需要保护Sheet2（日志）

问题问题在于，在Sheet2（日志簿）上，我希望VBA能够将用户信息添加到下一个可用行中，同时对其进行保护，以便任何人都无法查看和更改其他信息。以下是我尝试过的失败代码：

Private Sub Worksheet_Open()
    Worksheet.Protect "Password", UserInterfaceOnly:=True
End Sub

wksht unportect()/wksht protect()

---

这两个都不起作用。我还可以如何实现这一点？

您需要定义要保护的工作表。在下面的示例中，我将对象变量

WrkSht

设置为包含工作表“日志”的工作表属性。可以使用此对象变量上的protect方法来保护图纸

Sub ProtectWorksheet()
    Dim WrkSht As Worksheet
    Set WrkSht = ActiveWorkbook.Sheets("Log Book")

    WrkSht.Protect Password:="password", UserInterfaceOnly:=True
End Sub

---

我应该把它放在哪里，作为一个单独的子项（ProtectWorksheet），还是放在我试图访问锁定工作表的代码中？