Wie können Sie Zellen oder eine Auswahl in Excel basierend auf dem Wert einer anderen Zelle sperren oder entsperren?
In einigen Fällen müssen Sie Zellen oder einen Bereich basierend auf dem Wert einer anderen Zelle sperren oder entsperren. Beispielsweise soll der Bereich B1:B4 entsperrt sein, wenn Zelle A1 den Wert „Accepting“ enthält, und gesperrt sein, wenn Zelle A1 den Wert „Refusing“ enthält. Wie lässt sich das umsetzen? Dieser Artikel hilft Ihnen dabei.
Sperren oder Auswahl entsperren Basierend auf Wert anhand einer anderen Zelle mithilfe von VBA-Code
Sperren oder Auswahl entsperren Basierend auf Wert anhand einer anderen Zelle mithilfe von VBA-Code
Der folgende VBA-Code ermöglicht es Ihnen, Zellen in Excel basierend auf dem Wert einer anderen Zelle zu sperren oder deren Auswahl freizugeben.
1. Klicken Sie mit der rechten Maustaste auf die Arbeitsblattregisterkarte (das Arbeitsblatt mit den Zellen, die Sie abhängig vom Wert einer anderen Zelle sperren oder entsperren möchten), und wählen Sie im Kontextmenü Code anzeigen.
2. Kopieren Sie anschließend den folgenden VBA-Code und fügen ihn in das Code-Fenster ein.
VBA-Code: Sperren oder Auswahl entsperren Basierend auf Wert anhand einer anderen Zelle
Private Sub Worksheet_Change(ByVal Target As Range)
If Range("A1") = "Accepting" Then
Range("B1:B4").Locked = False
ElseIf Range("A1") = "Refusing" Then
Range("B1:B4").Locked = True
End If
End Sub 
3. Drücken Sie gleichzeitig die Tasten Alt + Q, um das Fenster Microsoft Visual Basic für Applikationen zu schließen.
Sobald Sie den Wert „Accepting“ in Zelle A1 eingeben, wird der Bereich B1:B4 ab sofort entsperrt.

Wenn Sie den Wert „Refusing“ in Zelle A1 eingeben, wird der Bereich B1:B4 automatisch gesperrt.


Entfesseln Sie die Magie von Excel mit KUTOOLS AI
- Intelligente Ausführung: Führen Sie Zelloperationen durch, analysieren Sie Daten und erstellen Sie Diagramme – alles ganz einfach per Sprachbefehl.
- Benutzerdefinierte Formeln: Erstellen Sie maßgeschneiderte Formeln, um Ihre Arbeitsabläufe optimal zu optimieren.
- VBA-Programmierung: Schreiben und implementieren Sie VBA-Code ganz mühelos.
- Formelinterpretation: Verstehen Sie komplexe Formeln spielend leicht.
- Textübersetzung: Überwinden Sie Sprachbarrieren direkt in Ihren Tabellenkalkulationen.
Verwandte Artikel:
- Wie können Sie alle Zellbezüge in Ihren Excel-Formeln gleichzeitig sperren?
- Wie können Sie Zellen in Excel nach der Dateneingabe sperren oder schützen?
- Wie können Sie ein Bild oder eine Grafik an oder innerhalb einer Zelle in Excel verankern?
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