Copier chaque nième ligne d'une feuille à une autre

Microsoft 365 & Office Excel & VBA
1

J’ai un tableur Excel avec 1 colonne et 700 lignes. Je m’intéresse à chaque septième ligne. Je ne veux pas avoir à supprimer les 6 lignes entre chaque ligne qui m’intéresse. Ma solution était donc de créer une autre feuille et de spécifier une référence vers chaque cellule souhaitée.

=sheet1!a1
=sheet1!a8
=sheet1!a15

Mais je ne veux pas taper chacune de ces formules… 100 fois. Je pensais que si je sélectionnais les trois et que je tirais la poignée, Excel comprendrait ce que j’essayais de faire, mais sans succès.

Des idées sur comment faire cela de manière élégante/efficace ?

2

Dans A1 de votre nouvelle feuille, mettez ceci :

=OFFSET(Sheet1!$A$1,(ROW()-1)*7,0)

… et copiez vers le bas. Si vous commencez ailleurs qu’à la ligne 1, changez ROW() en ROW(A1) ou une autre cellule de la ligne 1, puis copiez à nouveau vers le bas.

Si vous voulez copier la nième ligne mais sur plusieurs colonnes, utilisez la formule :

=OFFSET(Sheet1!A$1,(ROW()-1)*7,0)

Celle-ci peut aussi être copiée vers la droite.