Proposition de saisie dans une liste déroulante

  • Initiateur de la discussion Initiateur de la discussion CG29
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

CG29

XLDnaute Junior
Bonjour,

Je dois alimenter un tableau (Feuille 1) par l’intermédiaire d’une base de données (Feuille BD). Je dois donc rentrer dans la feuille 1 le matricule qui va permettre de renseigner les autres cellules avec la fonction Recherche V.

Je voudrai qu’on ne puisse saisir que des matricules existant dans la base. Peut-imaginer que si je tape 1 il me propose dans une liste tous les matricules qui comment par un 1 !

Exemple : Je tape 1 : Il me propose au sein d’une liste 1000 – 102500

Je tape 3 il me propose 30 et 320

Pouvez-vous m’expliquer la procédure ?

Merci d’avance,
 

Pièces jointes

Re : Proposition de saisie dans une liste déroulante

Sauf que dans ce cas, l'agent doit choisir dans la lsite déroulante.

La plage des matricules sera énorme de 1 à 100000 donc pourquoi j'avais si tu tapes la première lettre il te renvoie les chiffres pouvant correspondrent.

Merci de vos aides,
 
Dernière édition:
Re : Proposition de saisie dans une liste déroulante

Je pensais passer par un combobox qui serait rendu visible en sélectionnant une cellule de la colonne A.
Mais je n'arrive pas à lui faire comprendre qu'un chiffre tapé dont entrer dans la dite combobox et non dans la barre de formule.
Alors ce sera carrément un Userform muni de la combobox, là je suis sûr que ça marchera.

P.S. un premier jet
 

Pièces jointes

Dernière édition:
Re : Proposition de saisie dans une liste déroulante

Génial,

Peux-ton faire en sorte de bloquer la saie d'autres matricules qui ne sont pas dans la liste ?

Et surtout peux-tu m'explqiuer la procédure pour arriver à ce résultat ?

Merci bcp,
 
Re : Proposition de saisie dans une liste déroulante

Alt+F11 pour aller dans VBA
Demandez s'il y a lieu l'affichage de l'explorateur de projet.
Cliquez 2 fois sur UfSaisieMat dans l'explorateur de projet, il vous emmènera à la fenêtre de conception de la feuille (UserForm).
Demandez l'affichage du code, ou mieux cliquez 2 fois sur mon bouton "Ok".
Modifiez comme suit la procédure BtOk_Click
VB:
Private Sub BtOk_Click()
If Me.CbxSaisie.ListIndex >= 0 Then
   Cel.Value = Me.CbxSaisie.Text
   Me.Hide
Else
   MsgBox "Saisie incorrecte", vbExclamation, Me.Caption
   End If
End Sub
Je me suis aussi aperçu d'un problème dans la procédure précédente: elle ne marche plus bien quand on fait défiler les lignes. Correction:
VB:
Public Sub Afficher(Cellule As Range)
Set Cel = Cellule
Me.CbxSaisie.Text = Cel.Value
Me.Top = Cel.Top - ActiveWindow.VisibleRange.Top + 65
Me.Show
End Sub
Bonne soirée.
 
Dernière édition:
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
4
Affichages
250
Retour