Wie werden alle Arbeitsblätter beim Schließen der Excel-Arbeitsmappe automatisch geschützt?

Normalerweise können Sie ein Arbeitsblatt oder die gesamte Arbeitsmappe manuell mit einem Kennwort mit der Funktion "Blatt schützen" oder "Arbeitsmappe schützen" in Excel schützen. Was können Sie tun, wenn Sie alle Arbeitsblätter beim Schließen der Arbeitsmappe automatisch mit einem Kennwort schützen möchten? Dieser Artikel zeigt Ihnen eine VBA-Methode, um dies zu erreichen.

Schützen Sie alle Arbeitsblätter, wenn Sie die Excel-Arbeitsmappe mit VBA-Code schließen

Schützen Sie alle Arbeitsblätter, wenn Sie die Excel-Arbeitsmappe mit VBA-Code schließen

Wenden Sie den folgenden VBA-Code an, um alle Arbeitsblätter beim Schließen der Arbeitsmappe automatisch zu schützen.

1. In der Arbeitsmappe, in der Sie alle Arbeitsblätter beim Schließen der Datei schützen möchten, drücken Sie bitte die Taste Andere + F11 Schlüssel zum Öffnen der Microsoft Visual Basic für Applikationen Fenster.

2. In dem Microsoft Visual Basic für Applikationen Doppelklicken Sie im Fenster auf DiesesWorkbook Klicken Sie im linken Bereich unter den VBA-Code in das Codefenster. Siehe Screenshot:

VBA-Code: Schützen Sie alle Arbeitsblätter beim Schließen der Arbeitsmappe

Private Sub Workbook_BeforeClose(Cancel As Boolean)
'Update by Extendoffice 2018/1/24
    Dim xSheet As Worksheet
    Dim xPsw As String
    xPsw = ""
    For Each xSheet In Worksheets
        xSheet.Protect xPsw
    Next
End Sub

Trinkgeld:

Private Sub Workbook_BeforeClose(Cancel As Boolean)
    Sheets("Sheet1").Protect "123"
    ActiveWorkbook.Save
End Sub

3. Drücken Sie dann die Taste Andere + Q Tasten zum Schließen des Fensters Microsoft Visual Basic für Applikationen.

Nach dem obigen Schritt werden alle Arbeitsblätter oder das angegebene Arbeitsblatt beim Schließen der Arbeitsmappe automatisch geschützt.

Notizen:

In Verbindung stehende Artikel:

• Wie verwende ich eine Dropdown-Liste in einem geschützten Arbeitsblatt in Excel?
• Wie kann ich bestimmte Zellen sperren, ohne das gesamte Arbeitsblatt in Excel zu schützen?
• Wie kann ich die Formel ausblenden, aber das Ergebnis anzeigen, ohne das Arbeitsblatt in Excel zu schützen?