Rechercher 1 Valeur sur plusieurs feuilles

[overx]

Re bonjour à Tous!

J'ai encore un petit souci avec mon fichier!

Il s'agit dans l'exemple en pièce jointe de récupérer dans le premier onglet, le pourcentage de remise présent dans les feuilles portant le numéro de fournisseur.

Je sèche la dessus!

Merci encore pour votre aide.

 

[Guest]

Re : Rechercher 1 Valeur sur plusieurs feuilles

Bonjour OverX,

En C2 formule à tirer vers le bas.

=RECHERCHEV("remise";INDIRECT(B2 & "!$A:$B");2)

A charge pour toi de gérer les erreurs #REF lorsque la feuille n'existe pas.

A+

 

[jp14]

Re : Rechercher 1 Valeur sur plusieurs feuilles

Bonjour overx
Salut Hasco


Une macro évènementielle à tester

Option Explicit
Dim flag As Boolean
Private Sub Worksheet_Change(ByVal Target As Range)
Dim data1 As String
Dim cellule As Range
If flag = True Then Exit Sub
If Target.Count > 1 Then Exit Sub
Dim dl1 As Long ' dernière ligne
With Sheets(Target.Worksheet.Name)
dl1 = .Range("b65536").End(xlUp).Row
On Error GoTo suite
If Not Intersect(Target, Range("b2:b" & dl1)) Is Nothing Then
    flag = True
   Target.Offset(0, 1).Value = Sheets(CStr(Target.Value)).Range("b15").Value

End If


End With
flag = False
Exit Sub
suite:
Call MsgBox("Le code fournisseur n'existe pas" _
            & vbCrLf & "" _
            , vbCritical, "Problème")
flag = False
End Sub

JP

 

[BOISGONTIER]

Re : Rechercher 1 Valeur sur plusieurs feuilles

Bonjour,

=SI(ESTERREUR(INDIRECT(B2&"!B15"));"inconnu";INDIRECT(B2&"!B15"))

JB

 

[overx]

Re : Rechercher 1 Valeur sur plusieurs feuilles

Merci à vous trois ! 🙂 J'essaie tout de suite ces formules!