Recherche V ne fonctionnant pas

[db3j]

Bonjour,

je souhaite réaliser une recherche v sur un fichier excel.
Cependant celle-ci ne semble pas fonctionner, j'ai pourtant bien regarder tous les points qui pourraient porter à problème (format de cellule, nombre incorrect,...)

J'ai souhaité à la base réalisé une recherche v à partir d'un tableau issu d'un autre onglet mais je ne suis pas arrivé. Si vous y arrivez aussi, pouvez-vous me la rattacher aux fichiers de ma première demande.


Merci d'avance pour cette aide.

 

[R@chid]

Re : Recherche V ne fonctionnant pas

Bonjour et Bienvenu sur XLD,
Version 2007 et Plus,
en H5,

=SIERREUR(INDEX(PHONE_LIST!B$2:B$121;EQUIV(C5;PHONE_LIST!C$2:C$121;0));"")

Version antérieure,
en H5,

=SI(NB.SI(PHONE_LIST!C$2:C$121;C5);INDEX(PHONE_LIST!B$2:B$121;EQUIV(C5;PHONE_LIST!C$2:C$121;0));"")

Amicalement

 

[db3j]

Re : Recherche V ne fonctionnant pas

Bonjour,

merci d'avoir répondu dans la nuit.

je viens de tester les deux codes mais cela ne semble pas fonctionner.
Toujours une erreur dans la formulation indique excel.
Pouvez-vous me la mettre vous sur le fichier et me l'envoyer sur le forum.

Merci d'avance

 

[mikachu]

Re : Recherche V ne fonctionnant pas

salut!

Voilà, la recherchev fonctionne.
1: il y avait une erreur de synthaxe.
2: pour la formule recherchev, la "valeur_cherchée" doit se trouver dans la première colonne de la "table_matrice".
J'ai donc inversé les colonnes Y et Z 😉

 

[db3j]

Re : Recherche V ne fonctionnant pas

Bonjour mickachu

Merci pour la modification de cette commande.

Derniere petite requete si cela est possible.
Je souhaite avoir une macro permettant d'afficher toutes les données de ma table apres un filtre, est-ce que cela vous ai faisable?

Merci encore pour votre travail

 

[piga25]

Re : Recherche V ne fonctionnant pas

Bonjour db3j

Une solution entre autre à mettre dans un module :

Sub RemiseZero()
'
ActiveSheet.Range("$A$4:$H$2505").AutoFilter Field:=8
End Sub

Puis affecter cette macro au bouton (clic droit sur le bouton - Affecter macro)

 

[db3j]

Re : Recherche V ne fonctionnant pas

Bonjour Piga25,

en un mot "parfait"
Je ne sais pas si vous pouvez m'aider pour régler un dernier détail sur ce tableur,
je souhaiterais que dans ma combolist, il n'y ait pas de doublons, savez-vous comment opérer?

Merci d'avance

 

[mikachu]

Re : Recherche V ne fonctionnant pas

petit morceau de code pour alimenter une combobox sans doublon.

Je te laisse y jeter un oeil pour l'adapter à ton besoin

Private Sub UserForm_Initialize()
    Dim i As Integer
    
    'Boucle sur les cellule de la colonne A
    For i = 1 To Range("A65536").End(xlUp).Row
        
        'Remplit la zone d'édition du ComboBox
        ComboBox1 = Range("A" & i)
        
        'ComboBox1.ListIndex renvoie -1 si la donnée n'existe pas dans
        'la liste déroulante. Dans ce cas, on va pouvoir utiliser la méthode AddItem
        'pour intégrer la donnée dans le ComboBox.
        '(Range("A" & i) <> "" permet simplement de gérer les éventuelles cellules vides
        'dans la colonne A).
        If ComboBox1.ListIndex = -1 And Range("A" & i) <> "" Then _
            ComboBox1.AddItem Range("A" & i)
    Next i
End Sub

 

[R@chid]

Re : Recherche V ne fonctionnant pas

Bonsoir @ tous,

Bonjour,
merci d'avoir répondu dans la nuit.
je viens de tester les deux codes mais cela ne semble pas fonctionner.
Toujours une erreur dans la formulation indique excel.
Pouvez-vous me la mettre vous sur le fichier et me l'envoyer sur le forum.
Merci d'avance

Voir les 2 PJs...
Amicalement