vba - 如何锁定包含公式的单元格但仍允许宏工作？

Question

我有一个让员工填写的工作表，并且我已经计算了要锁定的单元格，以便他们无法更改它们。我已选择单元格和所选属性，并确保选中“锁定”复选框。当我保护工作表/工作簿时，“导出到 csv”宏按钮停止工作。为了使宏能够完成，我将此 VB 代码插入到工作簿中:

Private Sub Workbook_Open()

Dim wSheet As Worksheet
For Each wSheet In Worksheets

    wSheet.Protect Password:="password", _
    UserInterFaceOnly:=True

Next wSheet


End Sub

这有效，但产生了意想不到的副作用，即即使我的锁定公式已被锁定，也可以对其进行编辑。仅包含非公式值的单元格保持锁定。允许宏但仍锁定公式单元格的正确方法是什么？

Answer 1

我的解决方案是锁定整个工作簿和工作表，然后将代码写入 VB 按钮以禁用锁定，然后重新启用宏。就像这样:

Sub MyMacro()

Sheet1.Unprotect Password:="password"

    'insert code here

    Sheet1.Protect Password:="password"

End Sub

然后我删除了我的 Workbook_Open 代码。