Amelioration du Champ Rechercher Le sujet est résolu

Y compris Power BI, Power Query et toute autre question en lien avec Excel
Avatar du membre
nini007
Membre habitué
Membre habitué
Messages : 124
Inscrit le : 22 juillet 2013
Version d'Excel : 2007

Message par nini007 » 23 décembre 2013, 10:22

Bonjour,

Je me permets de solliciter l’aide du forum.

J’ai un fichier, ci-joint, ou j’au récupéré un code VBA sur le blog Excel-Pratique(merci pour ces vidéos), avec un champ de recherche.

J’aimerai si je cherche quelqu’un je commence à taper son nom, par exemple j’écris « A » dans le champ recherche, dans la liste à coté, je clique ou double clique sur Auguste et cette signe s’affiche directement sous collaborateur, sans à avoir besoin de scroller afin de faciliter la recherche.

J’espère que mes explications ont été suffisamment claire :D

Merci de votre aide
Meilleures salutations
Rechercher.xlsm
(40.53 Kio) Téléchargé 106 fois
Avatar du membre
Banzai64
Fanatique d'Excel
Fanatique d'Excel
Messages : 16'726
Appréciations reçues : 2
Inscrit le : 21 novembre 2010
Version d'Excel : 2003 FR (learning 2010 - 2013)

Message par Banzai64 » 23 décembre 2013, 13:17

Bonjour

Essayes cette macro
Private Sub TextBox1_Change()
Application.ScreenUpdating = False
Dim Lg As Long
 
    Range("A9:A1000").Interior.ColorIndex = 2
    ListBox1.Clear
    
    If TextBox1 <> "" Then
        For Ligne = 9 To 1000
            If Cells(Ligne, 1) Like "*" & TextBox1 & "*" Then
              If Lg = 0 Then
                Lg = Ligne
                ActiveWindow.ScrollRow = Lg
              End If
                Cells(Ligne, 1).Interior.ColorIndex = 43
                ListBox1.AddItem Cells(Ligne, 1)
            End If
        Next
    Else
      ActiveWindow.ScrollRow = 9
    End If

End Sub
Image
Avatar du membre
nini007
Membre habitué
Membre habitué
Messages : 124
Inscrit le : 22 juillet 2013
Version d'Excel : 2007

Message par nini007 » 23 décembre 2013, 16:05

Bonjour,

Merci pour l'aide.

Mais je voudrais, si je tape dans le champ recherche la lettre "F", tout les noms commencent par la lettre F s'affiche, et si je double click sur Françoise(la dernière de la liste) c'est cette ligne qui monte juste en dessous de "collaborateurs"

Est-ce possible ?


PS: ci-joint le fichier avec des noms rajoutés


Meilleures salutations
Rechercher_V2.xlsm
(39.87 Kio) Téléchargé 98 fois
Avatar du membre
Banzai64
Fanatique d'Excel
Fanatique d'Excel
Messages : 16'726
Appréciations reçues : 2
Inscrit le : 21 novembre 2010
Version d'Excel : 2003 FR (learning 2010 - 2013)

Message par Banzai64 » 23 décembre 2013, 16:19

Bonjour

Version à vérifier
nini007 Recherche V001.xlsm
(43.08 Kio) Téléchargé 404 fois
Image
Avatar du membre
nini007
Membre habitué
Membre habitué
Messages : 124
Inscrit le : 22 juillet 2013
Version d'Excel : 2007

Message par nini007 » 23 décembre 2013, 16:55

Re,

Merci super, c'est absolument ce que je désirais, super efficace ce forum :D
Je te remercie de ton aide. :clap:

Meilleures salutations
J
Judgedread
Nouveau venu
Nouveau venu
Messages : 9
Inscrit le : 23 juin 2014
Version d'Excel : 2007

Message par Judgedread » 23 juin 2014, 22:26

Bonjour,

Il est fort possible que la question ait déjà été postée mais je me lance tout de même.

Comment effectuer la recherche par mots clés quelque soit l’ordre de la phrase ?

Merci d'avance pour vos réponses.
J
Judgedread
Nouveau venu
Nouveau venu
Messages : 9
Inscrit le : 23 juin 2014
Version d'Excel : 2007

Message par Judgedread » 2 juillet 2014, 11:18

Personne ??

Merci d'avance.
J
Judgedread
Nouveau venu
Nouveau venu
Messages : 9
Inscrit le : 23 juin 2014
Version d'Excel : 2007

Message par Judgedread » 10 juillet 2014, 14:04

Please need help !!
J
Judgedread
Nouveau venu
Nouveau venu
Messages : 9
Inscrit le : 23 juin 2014
Version d'Excel : 2007

Message par Judgedread » 14 juillet 2014, 14:52

Toujours personne ?
Avatar du membre
Nad
Passionné d'Excel
Passionné d'Excel
Messages : 4'861
Appréciation reçue : 1
Inscrit le : 16 mars 2008
Version d'Excel : 2003 FR - 2007 FR

Message par Nad » 14 juillet 2014, 15:15

Bonjour

Tu écris sur un post passé en RESOLU

Ouvre ton propre fil et place un fichier exemple.

Amicalement
Nad
Répondre Sujet précédentSujet suivant
  • Sujets similaires
    Réponses
    Vues
    Dernier message