XL 2021 macro recherche par letre

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 !

le___destin

XLDnaute Occasionnel
merci de m'aider
je veux que si j'écris la première lettre les noms qui commence par cette lettre dans feuille 1 colonne C s'affiche pour facile la remplir de mon tableau et ajouter le non voulu
 

Pièces jointes

Solution
Bonjour le___destin,
Après 144 messages, toujours pas de "Bonjour", c'est dommage. 🙂
Pas tout compris à votre demande, alors un essai en PJ un peu au hasard. Cela donne :
20230918_164850.gif
Bonjour,

Plutôt qu'un UserForm il est plus simple d'utiliser une liste de validation, le code de Feuil2 :
VB:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim P As Range, source As Range
Set P = Range("E9:E" & Rows.Count)
P.Validation.Delete 'RAZ
If Intersect(ActiveCell, P) Is Nothing Then Exit Sub
Set source = Sheets("Feuil1").[A7].CurrentRegion
With Sheets("Liste")
    .Columns(1).Clear 'RAZ
    If ActiveCell = "" Then Exit Sub
    source.AutoFilter 3, ActiveCell & "*" 'filtre automatique
    source.Columns(3).Copy .[A1]
    source.AutoFilter 3
    .[A1].Delete xlUp
    If .[A1] <> "" Then ActiveCell.Validation.Add xlValidateList, Formula1:="=" & .Name & "!" & .UsedRange.Columns(1).Address
End With
End Sub
A+
 

Pièces jointes

- 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
8
Affichages
531
Réponses
12
Affichages
239
Réponses
4
Affichages
154
Retour