Recupérer des données

bonjour,

je souhaiterai un code me permettant des récupérer des données avec un critère spécifique d'un tableau présent sur un onglet et de basculer ces données sur un autre onglet.

ci joint mon tableau

le critère se trouve en colonne BB

copier uniquement les lignes ayant le critere en colonne BB "Rupture entrepôt + magasin"

Pouvez vous m'aider?

Bonjour,

Sub copy_filtre1()
With Sheets("tableau 1")
.Range("A12").AutoFilter field:=54, Criteria1:="Rupture Entrepôt + Magasin"
.Range("_FilterDatabase").SpecialCells(xlCellTypeVisible).Copy Sheets("Feuil1").Range("A1")
.Range("A12").AutoFilter
End With
End Sub