Trier 1 valeur sur 10

Bonjour à tous,

Je cherche à extraire d'une colonne de 10 000 valeurs, seulement 1 valeur toutes les 10 valeurs.

J'ai cherché dans les cours, parmi les anciennes publications et ailleurs sur le net mais je n'ai pas trouvé.

Je me doute que ça a déjà surement été demandé, alors désolé de vous faire répéter :

Merci d'avance de votre aide.

Bonjour bewan,

Si tes 10000 valeurs se trouvent en A1, A2,..., A10000, mets cette formule en B1 et tire-la vers le bas :

=DECALER($A$1;(LIGNE()-1)*10;)

Bonjour à tous,

Départ colonne "A" ligne 2, résultats en colonne "D"

Sub UnSurDix()
Dim Lg&, i%
    Application.ScreenUpdating = False
    Lg = Range("a" & Rows.Count).End(xlUp).Row
    For i = 2 To Lg Step 10
        Cells(65000, "d").End(xlUp)(2) = Cells(i, "a")
    Next i
End Sub

Bonne journée

Claude

Impeccable!!

Un grand merci.