Wie kann man bestimmte Zellen sperren, ohne das gesamte Arbeitsblatt in Excel zu schützen?
Normalerweise müssen Sie das gesamte Arbeitsblatt schützen, um die Auswahl vor Bearbeitung zu sperren. Gibt es eine Möglichkeit, die Auswahl zu sperren, ohne das gesamte Arbeitsblatt zu schützen? Dieser Artikel stellt Ihnen eine VBA-Methode vor.
Bestimmte Zellen ohne Schutz des gesamten Arbeitsblatts mithilfe von VBA sperren
Bestimmte Zellen ohne Schutz des gesamten Arbeitsblatts mithilfe von VBA sperren
Angenommen, Sie möchten die Zellen A3 und A5 im aktuellen Arbeitsblatt sperren – der folgende VBA-Code ermöglicht Ihnen dies, ohne das gesamte Arbeitsblatt zu schützen.
1. Klicken Sie mit der rechten Maustaste auf die Blattregisterkarte und wählen Sie Code anzeigen aus dem Kontextmenü.
2. Kopieren Sie anschließend den folgenden VBA-Code und fügen Sie ihn in das Code-Fenster ein – siehe Screenshot:
VBA-Code: Bestimmte Zellen ohne Schutz des gesamten Arbeitsblatts sperren
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Column = 1 Then
If Target.Row = 3 Or Target.Row = 5 Then
Beep
Cells(Target.Row, Target.Column).Offset(0, 1).Select
End If
End If
End Sub
Hinweis: Im Code bedeuten Spalte 1, Zeile = 3 und Zeile = 5, dass die Zellen A3 und A5 im aktuellen Arbeitsblatt nach Ausführung des Codes gesperrt werden. Sie können diese Angaben jederzeit anpassen.
3. Drücken Sie gleichzeitig die Tasten Alt + Q, um das Fenster Microsoft Visual Basic für Applikationen zu schließen.
Die Zellen A3 und A5 im aktuellen Arbeitsblatt sind nun gesperrt. Sobald Sie versuchen, eine dieser Zellen auszuwählen, springt der Cursor automatisch in die rechts daneben liegende Zelle.
Verwandte Artikel:
- Wie können Sie alle Zellbezüge in Ihren Excel-Formeln gleichzeitig sperren?
- Wie können Zellen in Excel nach der Dateneingabe gesperrt oder geschützt werden?
- Wie kann man eine Zelle oder Auswahl in Excel basierend auf dem Wert einer anderen Zelle sperren oder entsperren?
- Wie kann man ein Bild oder eine Grafik an oder innerhalb einer Zelle in Excel verankern?
- Wie kann man die Breite und Höhe von Zellen in Excel vor Änderungen schützen?
Beste Office-Produktivitätstools
Verbessern Sie Ihre Excel-Kenntnisse mit Kutools für Excel und erleben Sie Effizienz wie nie zuvor.Kutools für Excel bietet über 300 erweiterte Funktionen zur Steigerung der Produktivität und Zeit sparen.Klicken Sie hier, um die Funktion zu erhalten, die Sie am dringendsten benötigen...
Office Tab bringt eine tabbasierte Oberfläche in Office und macht Ihre Arbeit viel einfacher
- Aktivieren Sie tabbasiertes Bearbeiten und Lesen in Word, Excel, PowerPoint, Publisher, Access, Visio und Project.
- Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters – statt jedes in einem separaten Fenster zu öffnen.
- Steigert Ihre Produktivität um 50 % und erspart Ihnen täglich Hunderte von Mausklicks!
Alle Kutools-Add-Ins – ein Installationsprogramm
Kutools for Office-Paket bündelt Add-Ins für Excel, Word, Outlook und PowerPoint sowie Office Tab Pro – ideal für Teams, die mit mehreren Office-Anwendungen arbeiten.
- Alles-in-einem-Paket— Add-Ins für Excel, Word, Outlook & PowerPoint sowie Office Tab Pro
- Ein Installationsprogramm, eine Lizenz— innerhalb weniger Minuten eingerichtet (MSI-fähig)
- Funktioniert besser zusammen— optimierte Produktivität über alle Office-Anwendungen hinweg
- 30-tägige Vollversion zum Testen— keine Registrierung, keine Kreditkarte erforderlich
- Bestes Preis-Leistungs-Verhältnis— sparen Sie im Vergleich zum Kauf einzelner Add-Ins