aide pour la fonction RECHERCHEV

[illidan05]

Salut tout le monde,

J'utilise la fonction RECHERCHEV dans mon tableau excel pour qu'elle recherche le prix d'un article en fonction de la référence que je tape.
ma fonction est
=RECHERCHEV($D22;Télémécanique!$B$2:$C$100;2;0)

"D22" correspond à la cade où j'entre ma référence.
"Télémécanique" correspond à l'onglet où se trouvent les prix en colonne C et les références en colonne B.

Je voudrais étendre cette recherche à d'autres onglets qui se nomment "Legrand", "Socomec" etc...

Pouvez-vous m'aider svp ?

merci
a+

 

[Lord Nelson]

Re : aide pour la fonction RECHERCHEV

Salut,

Tu peux le faire avec la fonction INDIRECT qui passera le nom de la feuille à RECHERCHEV :

=RECHERCHEV($D22;INDIRECT($C22&"!$B:$C");2;0)

Dans cet exemple, le nom de la feuille est en C22.

Tu pourras également vérifier que ta référence est bien valide avec cette formule :

=SI(NB.SI(INDIRECT($C23&"!$B:$B");$D23)=0;"Rien trouvé";RECHERCHEV($D23;INDIRECT($C23&"!$B:$C");2;0))

A toi de jouer !

A+
Horatio

 

[illidan05]

Re : aide pour la fonction RECHERCHEV

ok merci,

si je trouve rien d'autre je ferai ça mais j'aurais voulu ne pas avoir à chaque fois à mettre le nom de l'onglet, une fonction qui scrute chaque onglet d'elle même.

 

[wilfried_42]

Re : aide pour la fonction RECHERCHEV

bonjour à tous

Si tu envoyais un bout du fichier, pour voir le nombre de feuille et leur structure, ca serait plus simple à repondre

Dans l'attente de te lire

cordialement

 

[illidan05]

Re : aide pour la fonction RECHERCHEV

voici mon fichier.
Dans l'onglet DA, je voudrais qu'en entrant la référence dans la colonne référence le prix s'affiche de lui même en allabnt chercher dans les autres onglets.

merci

 

[Lord Nelson]

Re : aide pour la fonction RECHERCHEV

Re,

Avec une fonction VBA, tu pourras parcourir toutes tes feuilles comme ceci :

Function RechercheGlobale(ValeurCherchée) As Double
Dim SH As Worksheet
Dim CL As Range
RechercheGlobale = 0
For Each SH In Worksheets
  If SH.Name <> "DA" Then
    For Each CL In SH.Range("B2:B" & SH.Range("B65536").End(xlUp).Row)
      If CL = ValeurCherchée Then
        RechercheGlobale = CL.Offset(0, 1)
      End If
    Next CL
  End If
Next SH
End Function

Et tu utiliseras la fonction RechercheGlobale comme ça :

=rechercheGlobale(B2)

A+
Horatio

 

[wilfried_42]

Re : aide pour la fonction RECHERCHEV

re:

fichier joint

5 Colonnes masquées, à completer (H à L) selon le nombre de fournisseur

Formules inirectes + Formules matricielles + Formule Dans les colonnes