resultat d'un filtre HELP !

Salut stephane,

Mais pourquoi filtrer ?
Un =NB.SI(ta plage;"ta date") te renverras le nombre 12.

Ândré.

En fait je cherche à chainer plusieurs macros de filtre afin de me constituer une sorte de bilan des achats :

ex 15 achats de robes le 15 mai
25 de pantalons le 12 juin etc....

je ne connais donc pas par avance ma plage de tri et ma recherche de filtre est multicriteres.

le passage par vba est donc indispensable.

Stephane

Resalut Stéphane,

Il me semble qu'un TCD (Tableau Croisé Dynamique) devrait faire l'affaire.
Ou bien une extraction sans doublons et un SOMMEPROD.

Vois dans ces deux directions, car en VBA je ne puis t'aider.
Ândré.

Bonjour
Effectivement, ce n'est pas très simple puisque autofilter ne semble pas renvoyer d'objet range
La méthode copier coller décrite cidessous fait cela discrétement.
dans l'exemple je cherhce toto dans la colonne b
Sub test()
Columns("B:B").Select
Selection.AutoFilter
Selection.AutoFilter field:=1, Criteria1:="toto"
Set mesdonnées = ActiveSheet.UsedRange.Columns(2)

mesdonnées.Copy
Set temp = Worksheets.Add
temp.Visible = False
temp.Paste
nbligne = temp.UsedRange.Columns(1).Rows.Count - 1
Application.DisplayAlerts = False
temp.Delete
Application.DisplayAlerts = True
mesdonnées.Parent.Activate
MsgBox nbligne
End Sub

ca marche super merci bien !