Find et date

[bernardrustrel]

Bonjour à tous
Je sollicite votre aide, car je me casse en vain la tête, afin de trouver une solution avec la fonction" FIND" qui devrait me permettre de trouver les coordonnées de la cellule ou se trouve la valeur cherchée.
Le fichier joint présente 2 fonctions en
- Utilisation de boucle afin de trouver les coordonnées , qui fonctionne (B4)
- Utilisation de FIND qui ne fonctionne pas et ne vois pas du tout pourquoi cela ne marche pas (B2)

Alors si l'un de vous pouvait m'éclairer sur mes erreurs j'en serai ravi.
Merci par avance
Cordialement, Bernard

 

[JHA]

Bonjour à tous,

Par formule peut être:

=EQUIV(A2;$D$2:$S$2;0)+3

pour avoir la lettre de la colonne

=SUBSTITUE(ADRESSE(1;EQUIV(A2;$D$2:$S$2;0)+3;4);1;"")

JHA

 

[job75]

Bonjour bernardrustrel, JHA,

Il faut convertir la date en texte et rechercher dans les formules :

Set Trouve = Plage.Cells.Find(CStr(Val), LookIn:=xlFormulas)

Edit : votre .Cells est inutile...

A+

 

[bernardrustrel]

Bonjour
Merci pour votre aide, une fois de plus j'en apprends.
Et si j'ai bien compris ce genre de recherche ne s'effectue que sur du texte ou assimilé.

Encore merci à vous
Cordialement
Bernard