在excel 2010中的受保护工作表中插入行

Question

我想在受保护的工作表中插入行。我在ThisWorkbook代码窗口中使用以下代码，但它无法正常工作。有人可以帮助我吗？

Private Sub workbook_Open()

    With Worksheets("Sheet1")
        .Protect Password:="vba2014", UserInterFaceOnly:=True, AllowInsertingRows:=True
        .EnableOutlining = True
    End With

End Sub

Answer 1

UserInterFaceOnly:=True中的Worksheet.Protect参数用于

  

保护用户界面，但不保护宏。如果省略此参数，则保护同时适用于宏和用户界面。

也就是说，它允许宏在受保护的工作表上运行，但仍然限制用户在保护设置中执行操作

您可以尝试在应用工作表保护时设置AllowInsertingRows:=True，但这种方法并不总是有效，例如如果工作表上有表/列表对象或合并单元格。