Drop Down Menü in Excel: Auswahl Sperren
Schritt-für-Schritt-Anleitung
Um ein Drop Down Menü in Excel zu sperren, folge diesen Schritten:
-
Zelle vorbereiten: Stelle sicher, dass du eine ComboBox (Formular-Steuerelement) in deiner Excel-Tabelle hast.
-
Makro erstellen:
- Öffne den VBA-Editor mit
ALT + F11.
- Füge ein neues Modul hinzu.
- Kopiere und füge den folgenden Code ein:
Sub FormOjekt_Sperren()
Dim wks As Worksheet, oShape As Shape
Set wks = Worksheets("Tabelle2") ' Passe den Namen des Arbeitsblattes an
With wks
.Unprotect ' ggf. Passwort ergänzen
Set oShape = .Shapes("Dropdown 1") ' Passe den Namen der ComboBox an
.Range(oShape.ControlFormat.LinkedCell).Locked = True
.Protect ' ggf. Passwort ergänzen
End With
End Sub
-
Makro ausführen: Schließe den VBA-Editor und führe das Makro aus, um die Auswahl im Drop Down Menü zu sperren.
Häufige Fehler und Lösungen
-
Fehler: Das Dropdown-Menü bleibt aktiv, obwohl das Arbeitsblatt geschützt ist.
- Lösung: Stelle sicher, dass du die verknüpfte Zelle mit
.Locked = True geschützt hast, bevor du das Blatt schützt.
-
Fehler: ComboBox wird nicht gefunden.
- Lösung: Überprüfe den Namen der ComboBox im Code und passe ihn an. Du kannst den Namen durch Rechtsklick auf die ComboBox und Auswahl von "Steuerelement formatieren" herausfinden.
Alternative Methoden
Wenn du eine andere Methode zum Sperren der Auswahl in einem Excel Dropdown Menue verwenden möchtest, kannst du die ComboBox als ActiveX-Steuerelement nutzen:
- ActiveX-ComboBox hinzufügen: Gehe auf die Registerkarte "Entwicklertools" und füge eine ActiveX-ComboBox hinzu.
-
Code anpassen: Verwende den folgenden Code, um die ComboBox zu deaktivieren:
Sheets(1).ComboBox1.Enabled = False ' oder den entsprechenden Namen
Diese Methode ermöglicht mehr Flexibilität bei der Anpassung der Eigenschaften.
Praktische Beispiele
Hier sind einige Beispielmakros, die dir helfen, die Auswahl in deinem Excel Dropdown Menü zu sperren:
Sub FormOjekt_Entsperren()
Dim wks As Worksheet, oShape As Shape
Set wks = Worksheets("Tabelle2")
With wks
.Unprotect ' ggf. Passwort ergänzen
Set oShape = .Shapes("Drop Down 1") ' Passe den Namen an
.Range(oShape.ControlFormat.LinkedCell).Locked = False
.Protect ' ggf. Passwort ergänzen
End With
End Sub
Sub Shapes_NamenListen()
Dim objShape As Shape
For Each objShape In ActiveSheet.Shapes
MsgBox "Name: " & objShape.Name
Next
End Sub
Diese Makros helfen dir, die ComboBoxen zu sperren und die Namen der Shapes aufzulisten.
Tipps für Profis
- Verknüpfung nutzen: Verknüpfe deine ComboBox mit einer Zelle, sodass der Benutzer keine Werte direkt in die ComboBox eingeben kann.
- Sichtbarkeit anpassen: Setze die ComboBox unsichtbar, wenn der Wert nicht benötigt wird, um die Benutzeroberfläche sauber zu halten.
- Versionsspezifische Eigenschaften: Achte darauf, welche Excel-Version du verwendest, da es Unterschiede in den Steuerelementen zwischen den Versionen geben kann.
FAQ: Häufige Fragen
1. Wie kann ich die Werte in meiner Dropdown-Liste ändern?
Um die Werte in einer Excel Dropdown-Auswahlliste zu ändern, gehe zu den Datenüberprüfungseinstellungen. Wähle die Zelle mit dem Dropdown-Menü aus, gehe auf "Daten" > "Datenüberprüfung" und bearbeite die Liste.
2. Kann ich mehrere Dropdown-Menüs in einem Arbeitsblatt haben?
Ja, du kannst mehrere Dropdown-Menüs in einem Arbeitsblatt erstellen. Achte darauf, jedem Menü einen eindeutigen Namen zu geben, um Konflikte zu vermeiden.
3. Funktioniert das Sperren der Auswahl in Excel 2007?
Ja, die oben beschriebenen Methoden funktionieren auch in Excel 2007. Achte darauf, die richtigen Steuerelemente zu verwenden, da es Unterschiede zwischen Formular- und ActiveX-Steuerelementen gibt.