Wie kann man die Autovervollständigung beim Tippen in einer Excel-Dropdown-Liste aktivieren?

Bei einer Dropdown-Liste mit Datenvalidierung und vielen Einträgen müssen Sie entweder im Listenfeld nach oben oder unten scrollen, um den benötigten Eintrag zu finden, oder das gesamte Wort korrekt in das Listenfeld eingeben. Gibt es eine Möglichkeit, die Dropdown-Liste so einzurichten, dass sie sich automatisch vervollständigt, wenn die entsprechenden Zeichen eingegeben werden? Dies würde die Arbeitseffizienz in Arbeitsblättern mit Dropdown-Listen in Zellen erheblich steigern. In diesem Tutorial werden zwei Methoden vorgestellt, um dieses Ziel zu erreichen.

Dropdown-Listen mit VBA-Code automatisch vervollständigen
Dropdown-Listen ganz einfach in 2 Sekunden automatisch vervollständigen
Weitere Tutorials für Dropdown-Listen...

Dropdown-Listen mit VBA-Code automatisch vervollständigen

Bitte gehen Sie wie folgt vor, um eine Dropdown-Liste automatisch zu vervollständigen, nachdem Sie die entsprechenden Buchstaben in die Zelle eingegeben haben.

Zuerst müssen Sie ein Kombinationsfeld in das Arbeitsblatt einfügen und dessen Eigenschaften ändern.

1. Öffnen Sie das Arbeitsblatt, das die Dropdown-Listen-Zellen enthält, die Sie automatisch vervollständigen möchten.
2. Bevor Sie ein Kombinationsfeld einfügen, müssen Sie der Excel-Menüleiste die Entwickler-Registerkarte hinzufügen. Wenn die Entwickler-Registerkarte bereits in Ihrer Menüleiste angezeigt wird, wechseln Sie zum Schritt 3. Andernfalls gehen Sie wie folgt vor, um die Entwickler-Registerkarte in der Menüleiste anzuzeigen: Klicken Sie auf „Datei“ > „Optionen“, um das Fenster „Optionen“ zu öffnen. In diesem Fenster „Excel-Optionen“ klicken Sie im linken Bereich auf „Menüband anpassen“, aktivieren das Kontrollkästchen „Entwickler“ und klicken dann auf die Schaltfläche „OK“. Siehe Screenshot:
   
3. Klicken Sie auf „Entwickler“ > „Einfügen“ > „Kombinationsfeld (ActiveX-Steuerelement)“.
   
4. Zeichnen Sie ein Kombinationsfeld im aktuellen Arbeitsblatt. Klicken Sie mit der rechten Maustaste darauf und wählen Sie „Eigenschaften“ aus dem Kontextmenü.
   
5. Geben Sie im Dialogfeld „Eigenschaften“ bitte den Originaltext im Feld „(Name)“ durch „TempCombo“ aus.
   
6. Schalten Sie den „Design-Modus“ aus, indem Sie auf „Entwickler“ > „Design-Modus“ klicken.

Wenden Sie dann den folgenden VBA-Code an.

1. Klicken Sie mit der rechten Maustaste auf die Registerkarte des aktuellen Blatts und klicken Sie im Kontextmenü auf „Code anzeigen“. Siehe Screenshot:
   
2. Kopieren Sie im geöffneten Fenster „Microsoft Visual Basic for Applications“ den folgenden VBA-Code und fügen Sie ihn in das Codefenster des Arbeitsblatts ein.
   VBA-Code: Automatische Vervollständigung beim Tippen in der Dropdown-Liste

   Private Sub Worksheet_SelectionChange(ByVal Target As Range)
   'Update by Extendoffice: 2020/01/16
       Dim xCombox As OLEObject
       Dim xStr As String
       Dim xWs As Worksheet
       Dim xArr
       
       Set xWs = Application.ActiveSheet
       On Error Resume Next
       Set xCombox = xWs.OLEObjects("TempCombo")
       With xCombox
           .ListFillRange = ""
           .LinkedCell = ""
           .Visible = False
       End With
       If Target.Validation.Type = 3 Then
           Target.Validation.InCellDropdown = False
           Cancel = True
           xStr = Target.Validation.Formula1
           xStr = Right(xStr, Len(xStr) - 1)
           If xStr = "" Then Exit Sub
           With xCombox
               .Visible = True
               .Left = Target.Left
               .Top = Target.Top
               .Width = Target.Width + 5
               .Height = Target.Height + 5
               .ListFillRange = xStr
               If .ListFillRange = "" Then
                   xArr = Split(xStr, ",")
                   Me.TempCombo.List = xArr
               End If
               .LinkedCell = Target.Address
           End With
           xCombox.Activate
           Me.TempCombo.DropDown
       End If
   End Sub
   Private Sub TempCombo_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
       Select Case KeyCode
           Case 9
               Application.ActiveCell.Offset(0, 1).Activate
           Case 13
               Application.ActiveCell.Offset(1, 0).Activate
       End Select
   End Sub

   
3. Drücken Sie gleichzeitig die Tasten „Alt + Q“, um das Fenster „Microsoft Visual Basic for Applications“ zu schließen.

Ab jetzt wird beim Klicken auf eine Dropdown-Listen-Zelle die Dropdown-Liste automatisch eingeblendet. Sie können mit dem Tippen eines Buchstabens beginnen, um den entsprechenden Eintrag automatisch in der ausgewählten Zelle zu vervollständigen. Siehe Screenshot:

Dropdown-Listen ganz einfach in 2 Sekunden automatisch vervollständigen

Für die meisten Excel-Benutzer ist die obige VBA-Methode schwer zu beherrschen. Mit der Funktion „Durchsuchbare Dropdown-Liste“ von Kutools für Excel können Sie jedoch ganz einfach die automatische Vervollständigung für Dropdown-Listen mit Datenvalidierung in einem bestimmten Bereich aktivieren – und das in nur 2 Sekunden. Darüber hinaus ist diese Funktion für alle Excel-Versionen verfügbar.

1. Um die automatische Vervollständigung in Ihren Dropdown-Listen zu aktivieren, wählen Sie zunächst den Bereich mit den Dropdowns aus. Navigieren Sie dann zur Registerkarte „Kutools“, wählen Sie „Dropdown-Liste“ > „Dropdown-Liste durchsuchbar machen, automatisch einblenden“.
2. Klicken Sie im Dialogfeld „Dropdown-Liste durchsuchbar machen“ auf die Schaltfläche „OK“, um die Einstellung zu speichern.

Ergebnis

Sobald die Konfiguration abgeschlossen ist, wird beim Klicken auf eine Dropdown-Listen-Zelle innerhalb des angegebenen Bereichs ein Listenfeld eingeblendet. Beim Eingeben von Zeichen wird, sobald ein Eintrag genau übereinstimmt, das gesamte Wort sofort im Listenfeld hervorgehoben und kann durch Drücken der Eingabetaste einfach in die Dropdown-Listen-Zelle übernommen werden.

Verwandte Artikel: