Wie kann verhindert werden, dass der Blattname in Excel geändert wird?

In Excel können Sie den Blattnamen ändern, indem Sie schnell und einfach auf den Registerkartennamen doppelklicken. Manchmal erlauben Sie anderen jedoch nicht, den Blattnamen zu ändern. Wie können Sie in diesem Fall verhindern, dass der Blattname in einer Arbeitsmappe geändert wird?

Verhindern Sie, dass der Blattname geändert wird, indem Sie die Arbeitsmappe schützen

Verhindern Sie, dass der Blattname mithilfe von VBA-Code geändert wird

Verhindern Sie, dass der Blattname geändert wird, indem Sie die Arbeitsmappe schützen

Wenn Sie die anwenden Arbeitsmappe schützen Funktion, werden alle Blattnamen nicht geändert, bitte gehen Sie wie folgt vor:

1. Klicken Sie Bewertung > Arbeitsmappe schützen, siehe Screenshot:

2. In dem Struktur und Windows schützen Dialogfeld, geben Sie das Passwort ein, überprüfen Sie die Struktur für Arbeitsmappe schützen fürund bestätigen Sie das Passwort erneut, siehe Screenshot:

3. Dann klick OK Wenn Sie jetzt auf die Schaltfläche doppelklicken, um den Blattnamen zu ändern, wird eine Warnmeldung angezeigt, die Sie daran erinnert, dass der Blattname nicht geändert werden kann. Siehe Screenshot:

Note: Mit dieser Funktion sind außer dem Ändern des Blattnamens auch andere Funktionen wie das Einfügen eines Blattes, das Löschen eines Blattes, das Ausblenden eines Blattes usw. deaktiviert.

Verhindern Sie, dass der Blattname mithilfe von VBA-Code geändert wird

Hier ist ein VBA-Code, mit dem Sie auch verhindern können, dass ein bestimmter Blattname geändert wird. Bitte machen Sie Folgendes:

1. Klicken Sie mit der rechten Maustaste auf die Blattregisterkarte, auf der Sie den Blattnamen schützen möchten, der nicht geändert werden soll, und wählen Sie dann Code anzeigen aus dem Kontextmenü in der herausgesprungenen Microsoft Visual Basic für Applikationen Fenster, bitte kopieren Sie den folgenden Code und fügen Sie ihn in das Feld ein Modul:

VBA-Code: Verhindern Sie, dass der Blattname geändert wird:

Private Sub worksheet_SelectionChange(ByVal Target As Excel.Range)
'Updateby Extendoffice
If ActiveSheet.Name <> "Master" Then
ActiveSheet.Name = "Master"
End If
End Sub

Note: Im obigen Code, Master ist der Blattname, den Sie vor Änderungen schützen möchten.

2. Speichern und schließen Sie dann den Code. Wenn Sie diesen bestimmten Blattnamen von nun an umbenennen, wird er sofort wieder auf den ursprünglichen Namen zurückgesetzt. Siehe Screenshot: