Comment activer l'autocomplétion lors de la saisie dans une liste déroulante Excel ?

Pour une liste déroulante de validation des données contenant de nombreux éléments, vous devez faire défiler la liste vers le haut ou vers le bas pour trouver celui dont vous avez besoin ou taper correctement le mot entier dans la zone de liste. Existe-t-il un moyen de rendre la liste déroulante auto-complétée lorsque vous tapez les caractères correspondants ? Cela aiderait les utilisateurs à travailler plus efficacement dans les feuilles de calcul avec des listes déroulantes dans les cellules. Ce tutoriel propose deux méthodes pour vous aider à y parvenir.

Activer l'autocomplétion des listes déroulantes avec du code VBA
Activer facilement l'autocomplétion des listes déroulantes en 2 secondes
Plus de tutoriels pour les listes déroulantes...

Activer l'autocomplétion des listes déroulantes avec du code VBA

Veuillez suivre les étapes ci-dessous pour rendre une liste déroulante auto-complétée après avoir tapé les lettres correspondantes dans la cellule.

Tout d'abord, vous devez insérer une zone combinée dans la feuille de calcul et modifier ses propriétés.

1. Ouvrez la feuille de calcul qui contient les cellules de la liste déroulante que vous souhaitez rendre auto-complétées.
2. Avant d'insérer une zone combinée, vous devez ajouter l'onglet Développeur au ruban Excel. Si l'onglet Développeur est visible sur votre ruban, passez à l'étape 3. Sinon, suivez les étapes ci-dessous pour afficher l'onglet Développeur dans le ruban : Cliquez sur "Fichier" > "Options" pour ouvrir la fenêtre "Options". Dans cette fenêtre "Options Excel", cliquez sur "Personnaliser le Ruban" dans le volet gauche, cochez la case "Développeur", puis cliquez sur le bouton "OK". Voir capture d'écran :
   
3. Cliquez sur "Développeur" > "Insérer" > "Zone combinée (Contrôle ActiveX)".
   
4. Dessinez une zone combinée dans la feuille de calcul actuelle. Faites un clic droit dessus, puis sélectionnez "Propriétés" dans le menu contextuel.
   
5. Dans la boîte de dialogue "Propriétés", remplacez le texte original dans le champ "(Nom)" par "TempCombo."
   
6. Désactivez le "Mode Création" en cliquant sur "Développeur" > "Mode Création".

Ensuite, appliquez le code VBA ci-dessous

1. Faites un clic droit sur l'onglet de la feuille actuelle et cliquez sur "Afficher le Code" dans le menu contextuel. Voir capture d'écran :
   
2. Dans la fenêtre "Microsoft Visual Basic for Applications" qui s'ouvre, copiez et collez le code VBA ci-dessous dans la fenêtre Code de la feuille de calcul.
   Code VBA : Autocomplétion lors de la saisie dans une liste déroulante

   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. Appuyez simultanément sur les touches "Alt + Q" pour fermer la fenêtre Microsoft Visual Basic for Applications.

Dès maintenant, lorsque vous cliquez sur une cellule de liste déroulante, la liste déroulante apparaîtra automatiquement. Vous pouvez commencer à taper la lettre pour compléter automatiquement l'élément correspondant dans la cellule sélectionnée. Voir capture d'écran :

Activer facilement l'autocomplétion des listes déroulantes en 2 secondes

Pour la plupart des utilisateurs d'Excel, la méthode VBA ci-dessus est difficile à maîtriser. Mais avec la fonctionnalité "Liste déroulante consultable" de Kutools pour Excel, vous pouvez facilement activer l'autocomplétion pour les listes déroulantes de validation des données dans une plage spécifiée en seulement 2 secondes. De plus, cette fonctionnalité est disponible pour toutes les versions d'Excel.

1. Pour activer l'autocomplétion dans vos listes déroulantes, commencez par sélectionner la plage contenant les listes déroulantes. Ensuite, accédez à l'onglet "Kutools", choisissez "Liste déroulante" > "Rendre la liste déroulante consultable, Auto-popup."
2. Dans la boîte de dialogue "Rendre la liste déroulante consultable", cliquez sur le bouton "OK" pour enregistrer le paramètre.

Résultat

Une fois la configuration terminée, cliquer sur une cellule de liste déroulante dans la plage spécifiée fera apparaître une liste déroulante. Lorsque vous entrez des caractères, dès qu'un élément correspond exactement, le mot entier est immédiatement mis en surbrillance dans la liste déroulante et peut être inséré dans la cellule de la liste déroulante simplement en appuyant sur la touche Entrée.

Articles connexes :

Meilleurs outils de productivité pour Office

🤖	Kutools AI Aide : Révolutionnez l'analyse de données avec : Exécution intelligente | Générer du code | Créer des formules personnalisées | Analyser des données et générer des graphiques | Appeler les Fonctions améliorées de Kutools…
	Fonctionnalités populaires : Trouver, mettre en évidence ou marquer les doublons | Supprimer les lignes vides | Combinez les colonnes ou les cellules sans perte de données | Arrondir sans formule...
	Super RECHERCHEV : Recherche multi-critères | Recherche multi-valeurs | Recherche multi-feuilles | Correspondance floue...
	Liste déroulante avancée : Créer rapidement une liste déroulante | Liste déroulante dépendante | Liste déroulante à sélection multiple...
	Gestionnaire de colonnes : Ajouter un nombre spécifique de Colonnes | Déplacer des Colonnes | Alterner l’état de visibilité des Colonnes masquées | Comparer des plages & Colonnes...
	Fonctionnalités phares : Mise au point de la grille | Affichage de conception | Barre de formule améliorée | Gestionnaire de Classeur & Feuille de calcul | Bibliothèque d’AutoTexte | Sélecteur de date | Merge Worksheets | Chiffrer/Déchiffrer les cellules | Envoyer un e-mail par liste | Super Filtre | Filtre spécial (filtrer les cellules avec une police en gras/italique/barré...)...
	Top15 des ensembles d’outils :12 outils de texte (Ajouter du texte, Supprimer des caractères spécifiques, ...) |50+ Types de graphiques (Diagramme de Gantt, ...) |40+ Formules pratiques (Calculer l’âge en fonction de la date de naissance, ...) |19 outils d’insertion (Insérer un code QR, Insérer une image depuis le chemin, ...) |12 outils de conversion (Convertir en mots, Conversion de devises, ...) |7 outils de fusion & division (Fusion avancée des lignes, Diviser les cellules, ...) | ... et bien plus encore

Utilisez Kutools dans la langue de votre choix – disponible en Anglais, Espagnol, Allemand, Français, Chinois et plus de40 autres !

Améliorez vos compétences Excel avec Kutools pour Excel, et découvrez une efficacité incomparable. Kutools pour Excel propose plus de300 fonctionnalités avancées pour booster votre productivité et gagner du temps. Cliquez ici pour obtenir la fonctionnalité dont vous avez le plus besoin...

Plus de détails sur Kutools pour Excel... Téléchargement gratuit...

---

Office Tab apporte l’interface par onglets à Office, simplifiant considérablement votre travail.

• Activez la modification et la lecture par onglets dans Word, Excel, PowerPoint, Publisher, Access, Visio et Project.
• Ouvrez et créez plusieurs documents dans de nouveaux onglets de la même fenêtre, plutôt que dans de nouvelles fenêtres.
• Augmente votre productivité de50 % et réduit des centaines de clics de souris chaque jour !

Plus de détails sur Office Tab... Téléchargement gratuit...

---

Tous les modules complémentaires Kutools. Une seule installation

La suite Kutools for Office regroupe les modules complémentaires pour Excel, Word, Outlook & PowerPoint ainsi qu’Office Tab Pro, idéal pour les équipes travaillant sur plusieurs applications Office.

• Suite tout-en-un — modules complémentaires Excel, Word, Outlook & PowerPoint + Office Tab Pro
• Un installateur, une licence — installation en quelques minutes (compatible MSI)
• Une synergie optimale — productivité accélérée sur l’ensemble des applications Office
• Essai complet30 jours — sans inscription, ni carte bancaire
• Meilleure valeur — économisez par rapport à l’achat d’add-ins individuels

Plus de détails sur Kutools for Office... Téléchargement gratuit...