legrand.slb
XLDnaute Nouveau
Peut-on renvoyer dans une macro excel la valeur d'une (ou plusieurs) cellule(s) afin de l' (ou les) utiliser comme critère de recherche dans la base de données ?
Merci
Merci
Dim x As String
Dim t()
'valeur d'une cellule
x = Range("A1").Value
'valeur d'une plage de cellules
t = Range("F1:G20").Value
Dim x As String
x = Range("A1").Value
Selection.AutoFilter Field:=1, Criteria1:="=*" & x & "*"
Dim t()
t = Range("D1:E1").Value
Selection.AutoFilter Field:=1, Criteria1:="=*" & t(1, 1) & "*", Operator:=xlOr, _
Field:=1, Criteria1:="=*" & t(1, 2) & "*"