使用多個保護變量保護Excel工作表

Question

使用Excel VBA，如何鎖定具有多個不同變量的工作表，即允許用戶使用自動篩選器和排序選項。

我有這個迄今爲止得到：

工作表（「表1」）保護密碼：=「密碼」

我怎麼寫旁邊允許用戶： 選擇UN /鎖定單元格 格式列/行 排序 使用自動篩選

謝謝

Answer 1

有16個參數，你可以用滿足Protect使用工作表的問題。這是基於一個代碼示例關閉此MSDN文章：

Option Explicit 

Sub LockSheet() 

    Dim ws As Worksheet 

    Set ws = ThisWorkbook.Worksheets(1) 

    ws.Protect Password:="Foo", _ 
     DrawingObjects:=True, _ 
     Contents:=True, _ 
     Scenarios:=True, _ 
     UserInterfaceOnly:=True, _ 
     AllowFormattingCells:=True, _ 
     AllowFormattingColumns:=True, _ 
     AllowFormattingRows:=True, _ 
     AllowInsertingColumns:=True, _ 
     AllowInsertingRows:=True, _ 
     AllowInsertingHyperlinks:=True, _ 
     AllowDeletingColumns:=True, _ 
     AllowDeletingRows:=True, _ 
     AllowSorting:=True, _ 
     AllowFiltering:=True, _ 
     AllowUsingPivotTables:=True 

End Sub 

Answer 2

只是要添加到@Robin給出的答案，這裏是URL到.PROTECT功能，你會發現它有用的閱讀各有什麼參數做，也有一些被認爲是真的，有些是假的。

https://msdn.microsoft.com/en-us/library/office/ff840611.aspx

親切的問候，

lewisthegruffalo