保护除某些单元格之外的工作簿

时间:2018-01-18 13:01:07

标签: excel vba excel-vba

我想用密码保护我的整个Excel工作簿。除了另一张纸上的一张纸和一张纸。我设法排除了一张纸。但在表格中(" Voorblad")我只希望一个单元格(D5)不受保护。

当我尝试将某些内容与Range(" D5")结合使用时,它会失败。

Sub Beveiliging_Bestand()

    For Each Sheet In ActiveWorkbook.Sheets
    If Sheet.Name <> "Inputdata" And _
       Sheet.Name <> "Voorblad" Then
        Sheet.Protect (Password = "kpi")
    End If
Next

End Sub

1 个答案:

答案 0 :(得分:0)

保持细胞解锁的方法应该是:

worksheets("Voorblad").range("D5").locked = false
之后

保护你的床单