Création d'une boucle dans ma "petite macro"

Bonjour à tous,

Dans un fichier xls , j'ai créé la macro suivante:

Sub maxpargroupe()

Sheets("Draft").Select
Range("C3").Select
Selection.AutoFilter
Selection.AutoFilter Field:=3, Criteria1:="1"
Range("S3").Select
Selection.Copy
Sheets("test").Select
Range("A1").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False

Sheets("Draft").Select
Range("C3").Select
Selection.AutoFilter
Selection.AutoFilter Field:=3, Criteria1:="2"
Range("S3").Select
Selection.Copy
Sheets("test").Select
Range("A2").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False

end sub


En fait j'aimerai créer une boucle qui permette de faire marcher cette macro avec une incrementation des valeurs en rouge (ci-dessus) de +1 à chaque boucle, allant de la plage Range(1) à range (75) et de Criteria1(1) à Criteria (75) ..Ayant peu de connaissances en VBA je n'arrive pas à faire cette boucle, et faire un copier /coller 75fois ne me rejouis pas vraiment!....je pense que les connaisseurs pourront me repondre facilement et completer ma macro avec cette fameuse boucle!...

Je vous remercie par avance!!
J'espere avoir été clair dans ma question...
A bientot!