RechercheV avec format cellule

Re : RechercheV avec format cellule

Bonjour,

Quelques infos ici :
https://www.excel-downloads.com/threads/recherchev-probleme-de-format-de-cellule.132576/
Une solution ici :
Fonction Recherchev()

Re : RechercheV avec format cellule

Merci pour l'info,

Cependant mes conaissance en VBA sont limités. Il me faudrait des modifications sur un code exsistant. Fonction Recherchev() présentation

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 1 And Target.Count = 1 Then
p = Application.Match(Target, Application.Index([données], , 1), 0)
If Not IsError(p) Then
Sheets("BD").Range("données").Cells(p, 2).Copy Target.Offset(, 1)
End If
End If
End Sub
Private Sub Worksheet_Activate()
Application.ScreenUpdating = False
For Each c In [A4:W1000]
p = Application.Match(c, Application.Index([données], , 1), 0)
If Not IsError(p) Then
Sheets("BD").Range("données").Cells(p, 2).Copy c.Offset(, 1)
End If
Next c
Application.ScreenUpdating = True
End Sub

En vert: il faudrait que cela fasse référence à plusieures feuilles (sheet) et pas la feuille "BD"

En rouge : comme je fait la recherche sur plusieurs feuille, faut-il que je crée "données" dans chacune de mes feuilles concernés ?