Extraire des données textes d'une liste suivant 2 critères

Riccoplus Messages postés 15 Date d'inscription   Statut Membre Dernière intervention   -  
yclik Messages postés 3875 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour tout le monde,
je voudrais vous soumettre un petit problème que je n'arrive pas à résoudre en Macro; je pense qu'il faut pas passer en vba, mais je suis nul dans ce langage.
J'ai une liste de données textes sur l'onglet Feuille1, et je voudrais récupérer sur la feuille2 seulement les lignes qui contiennent les 2 critères (Renault et Rouge), sans passer par une méthode manuelle type Tri ou filtre.
Je vous joins une image de ma liste.
Merci pour votre aide.
A voir également:

3 réponses

ccm01
 
Bjr,

Quelle version d'Excel ?

Crdlmnt
0
Riccoplus Messages postés 15 Date d'inscription   Statut Membre Dernière intervention  
 
Bonjour ccm01,
la version d'Excell est 2013.
Merci pour votre aide
0
Raymond PENTIER Messages postés 58990 Date d'inscription   Statut Contributeur Dernière intervention   17 355
 
Une piste : En E saisir la formule =B:B&C:C ="RenaultRouge" qui affichera VRAI ou FAUX selon le cas ...
0
Riccoplus Messages postés 15 Date d'inscription   Statut Membre Dernière intervention  
 
Bonjour Raymond,
merci pour votre réponse.
La formule est intéressante, mais je souhaiterais que les lignes qui ne contiennent pas les 2 critères (Renault et Rouge) soient supprimées.
Qu'en pensez-vous ?
Merci d'avance
0
yclik Messages postés 3875 Date d'inscription   Statut Membre Dernière intervention   1 563
 
Bonjour
une piste illustrée sur la même feuille


col E repérage des ctitères de recherche
=SI($G$2&$G$3=B2&C2;LIGNE();"")


ensuite recherche des lignes concernées
PETITE.VALEUR($E$2:$E$20;LIGNE()-1)

combinées avec les fonctions INDEX et EQUIV pour retrouver les données

La fonction EQUIV retrouve la ligne concernée
EQUIV(PETITE.VALEUR($E$2:$E$20;LIGNE()-1);$E$1:$E$20;0)

La fonction INDEX affiche l'info
INDEX($A$1:$D$20;EQUIV(PETITE.VALEUR($E$2:$E$20;LIGNE()-1);$E$1:$E$20;0);1)


Ajout de la fonction ESTERREUR pour un affichage sans les erreurs (utiliser SIERREUR sur excel)
0