XL 2021 Formulaire de saisie VBA

Lily_73

XLDnaute Nouveau
Bonjour,

Je suis en train de travailler sur un formulaire de saisie sur Excel. Je souhaiterai pouvoir y intégrer des ComboBox (liste déroulante) avec saisie semi-automatique.
Je voudrais que cela fonctionne comme une barre de recherche avec l'apparition des mots de la liste qui contiennent les lettres saisies par l'utilisateur.

Est-ce que quelqu'un saurait comment faire ? Et si oui pourrait m'expliquer la démarche à suivre ?

Je vous remercie pour votre aide et vous souhaite une bonne soirée.
 

Lily_73

XLDnaute Nouveau
Merci pour votre réponse.
Toutefois ce n'est pas exactement ce que je recherche.
Je vous joint un extrait de mon fichier pour éclaircir mon problème.
Pour le premier ingrédient, je souhaiterait que tous les ingrédients qui contiennent les lettres saisies apparaissent dans la liste déroulante.
Je ne sais pas si il est possible d'effectuer une telle action ?

(J'aimerai également que les ingrédients apparaissent dans la feuille "recettes" une fois la saisie terminée.

Bien cordialement
 

Pièces jointes

  • Formualaire ingrédients.xlsm
    53.5 KB · Affichages: 7

Dranreb

XLDnaute Barbatruc
Pour reproduire ceci dans votre UserForm vous n'avez besoin que de mon module de service standard MSujetCBx. Dans le code de l'UserForm :
VB:
Option Explicit
Private TIngr(), Sujet, SujFlt
Private Sub UserForm_Initialize()
   TIngr = [Tableau2[Ingrédients]].Value
   Sujet = SujetCBx(TIngr)
   SujFlt = Sujet
   Me.Ingr1.List = SujFlt(0)
   End Sub
Private Sub Ingr1_Change()
   If Not Ingr1 Is Me.ActiveControl Then Exit Sub
   If Ingr1.MatchFound Or Ingr1.Text = "" Then Exit Sub
   Dim S ' Sujet temporaire pour recherche intuitive
   S = SujCBxLike(Sujet, "*" & Ingr1.Text & "*")
   If IsEmpty(S) Then Exit Sub
   SujFlt = S ' Affectation du sujet temporaire.
   Me.Ingr1.List = SujFlt(0)
   Ingr1.DropDown ' Affichage de la liste
   End Sub
Nettoyez préalablement la propriété RowSource de la CBx Ingr1, sinon "Permission refusée" lors de la tentative de modifier sa List.
 

youky(BJ)

XLDnaute Barbatruc
Bonjour tous, Lily, Dranreb
Pour le fun et pour compléter la demande de réaliser toute la recette en recette
j'avais fait ceci et oublier d'envoyer.
Bonne semaine
Bruno
 

Pièces jointes

  • Formualaire ingrédients (1).xlsm
    65.4 KB · Affichages: 27

Discussions similaires

Réponses
3
Affichages
469
Réponses
27
Affichages
646

Statistiques des forums

Discussions
313 296
Messages
2 096 922
Membres
106 787
dernier inscrit
Rachid ALIOU