Excel-Arbeitsblatt mit mehreren Schutzvariablen schützen

Question

Mit Excel VBA können Sie Arbeitsblätter mit mehreren verschiedenen Variablen sperren, z. B. Benutzern die Verwendung von Autofilter und der Sortieroption erlauben.

Arbeitsblatt ("Blatt 1") Kennwortschutz:

Ich habe so weit gekommen. = "Passwort"

Was schreibe ich nächste Benutzer zu ermöglichen: Wählen un/gesperrte Zellen Format Spalten/Zeilen Sortieren verwenden Autofilter

Danke,

Answer 1

Es gibt 16 Parameter, die Sie mit dem Protect können erfüllt hod des Arbeitsblatts. Hier ist ein Codebeispiel dieses MSDN Artikel basiert weg:

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

einfach auf die Antwort von @Robin gegeben hinzufügen möchten, hier ist die URL zum .Schutz Funktion, können Sie finden es nützlich zu lesen, was jeder der Parameter tun, auch einige werden als wahr und einige als falsch angenommen.

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

Mit freundlichen Grüßen

lewisthegruffalo