在vba中“锁定功能”不再起作用

Question

我有一个工作宏，可以正确地在给定的工作簿中写入几个单元格。但是，在3个月后返回代码后，整个工作表被锁定，而不是所讨论的单元格是可写的，请参见代码。

Excel是否可能有一个阻止单元格正确锁定的更新？

谢谢

e
s
ha

Answer 1

您的代码可以在测试表上为我工作。但是我想知道工作表是否没有解锁（密码？）-因为这将无声地失败，但是没有任何更改会生效。如果发生这种情况，此版本会警告您

With Worksheets("xyz")
    .Unprotect  'must unprotect to make changes
     If .ProtectContents Then MsgBox "unprotect failed"
    .Cells.Locked = True  'lock everything
    .Range(.Cells(9, 4), .Cells(14, 7)).Locked = False  'unlock desired cells

    .Protect  'protect sheet, now the lock takes effect
End With
End Sub