VBA - Autofilter - nb valeur d'un field et récupérer le champ

[Daminoutchi]

Bonjour à tous

Je cherche a imprimer en automatique 1 par 1 chaque : Criteria1:="xxx"
d'un : Selection.AutoFilter
Je veux donc une tableau imprimé avec les lignes de toutes les commandes d'un même client et cela pour chacun des clients de la feuille.

Exemple :
numClient adresse commande
23 blabla blabla
26 qdsqs qsdqsd
23 qsdqs dq sdq
26 aaa aaa

 Selection.AutoFilter Field:=1, Criteria1:="26"
    ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True

J'utilise ce bout de code. Mais mon problème est comment connaitre le nombre de Criterira1 du Field1. Est il possible de faire un count ou quelque chose?
Ensuite second problème, comment je peux prendre cette valeur et l'assigné à la propriété Criteria1:=

Merci d'avance pour votre coup de pouce !

 

[Catrice]

Re : VBA - Autofilter - nb valeur d'un field et récupérer le champ

Bonsoir,

Ci-joint une solution passant par les Filtres elaborés

 

[Daminoutchi]

Re : VBA - Autofilter - nb valeur d'un field et récupérer le champ

Merci Catrice
cela fonctionne mais dans mon cas je neveux pas de copie "ailleur" j'ai donc trouvé une solution ce matin avec le type collection (en vba)
En tout cas ton exemple mais bien épaulé.
Merci