Recherche V partielle

MP59

XLDnaute Occasionnel

• 4 Mai 2020

• #2

Bonjour,
a priori, pas besoin de recherchev.

 

Pièces jointes

• RECHERCHEV.xlsx

  10.5 KB · Affichages: 8

Vote positif 0 Vote négatif

djidji59430

XLDnaute Barbatruc

• 4 Mai 2020

• #3

Bonjour à tous,

Faudrait déja que toutes tes dates soient dans des formats de date acceptés par excel !
en b2 = mois(a2) et format personalisé 00

 

Pièces jointes

• RECHERCHEV.xlsx

  9.8 KB · Affichages: 3

Vote positif 0 Vote négatif

sylvanu

XLDnaute Barbatruc

Supporter XLD

• 4 Mai 2020

• #4

Bonjour JHA91,djidji,MP
Avec une petite formule :

VB:

=EQUIV(SUPPRESPACE(GAUCHE(DROITE(TEXTE(A2;" j mmmm aaaa");10);5));'base de donnée'!$A$1:$A$12;0)

La colonne B de Base de Données ne sert à rien car l'equiv remonte le bon numéro.

 

Pièces jointes

• RECHERCHEV.xlsx

  15.8 KB · Affichages: 2

Vote positif 0 Vote négatif

J

JHA

XLDnaute Barbatruc

• 4 Mai 2020

• #5

Bonjour à tous,

A essayer cette formule matricielle

VB:

=SIERREUR(EQUIV(STXT($A2;CHERCHE(" ";$A2)+1;4);GAUCHE('base de donnée'!$A$1:$A$12;4);0);MOIS($A2))

ou

Code:

=TEXTE(SIERREUR(EQUIV(STXT($A2;CHERCHE(" ";$A2)+1;4);GAUCHE('base de donnée'!$A$1:$A$12;4);0);MOIS($A2));"00")

JHA

 

Pièces jointes

• RECHERCHEV (1).xlsx

  10.8 KB · Affichages: 3

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 4 Mai 2020

• #6

Bonjour,

En B2 :

VB:

=TEXTE(--SUBSTITUE(A2;".";);"mm")

 

Pièces jointes

• Mois(1).xlsx

  11 KB · Affichages: 6

Vote positif 0 Vote négatif

J

jha91

XLDnaute Nouveau

• 4 Mai 2020

• #7

L'avalanche de solution ! merci à tous c'est vraiment très réactifs ! je vais opter pour la solution de MP59, merci encore.
Pour mes prochaines recherches et puisque je vous ai sous la main, est ce que une rechercheV (ou x) est possible dans un cas comme celui ci? en imaginant que ce ne soit pas des dates, mais du texte.
L'idée est de pouvoir faire correspondre une donnée d'un tableau en cherchant un terme dans une cellule.
Une idée?

 

Vote positif 0 Vote négatif

djidji59430

XLDnaute Barbatruc

• 4 Mai 2020

• #8

Bonjour à tous,

job75 à dit:

En B2 :

VB:

=TEXTE(--SUBSTITUE(A2;".";);"mm")

Cliquez pour agrandir...

Autant la formule est élégante, autant sur le principe je ne suis pas d'accord !
C'est encourager les gens à écrire n'importe quoi, a ne pas respecter les syntaxes

 

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 4 Mai 2020

• #9

djidji59430 à dit:

Autant la formule est élégante, autant sur le principe je ne suis pas d'accord !
C'est encourager les gens à écrire n'importe quoi, a ne pas respecter les syntaxes

Cliquez pour agrandir...

Quand on importe des "dates" on peut obtenir des textes comme sur A3:A10.

Si l'on revalide ces cellules peut obtenir de "vraies" dates (nombres) comme en A2, mais pas forcément...

 

Vote positif 0 Vote négatif

J

jha91

XLDnaute Nouveau

• 5 Mai 2020

• #10

Du coup une idée pour mon rechercheV d'un terme dans une cellule?

 

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 5 Mai 2020

• #11

jha91 à dit:

Du coup une idée pour mon rechercheV d'un terme dans une cellule?

Cliquez pour agrandir...

Dépêchez-vous de l'oublier !

 

Vote positif 0 Vote négatif

J

jha91

XLDnaute Nouveau

• 5 Mai 2020

• #12

job75 à dit:

Dépêchez-vous de l'oublier !

Cliquez pour agrandir...

Oh non je ne suis pas pressé, j'avais juste peur que vos ébats amoureux ne cachent le sujet de cette discussion.

 

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 5 Mai 2020

• #13

Il manquait une fonction VBA, la voici :

VB:

Function TrouveMois(c As Range)
Application.Volatile
Dim x$, i As Byte
x = LCase(c.Text)
For i = 1 To 12
    If InStr(x, Format("1/" & i, "mmm")) Then Exit For
Next
TrouveMois = IIf(i > 12, "", i)
End Function

C'est le texte du mois affiché en colonne A qui est recherché, voyez le fichier joint.

 

Pièces jointes

• TrouveMois(1).xlsm

  17.8 KB · Affichages: 3

Vote positif 0 Vote négatif

J

jha91

XLDnaute Nouveau

• 6 Mai 2020

• #14

Merci, et bon courage à tous !

 

Vote positif 0 Vote négatif