Copie d'une cellule toutes les x lignes

Résolu/Fermé

bix - 29 févr. 2016 à 14:57
Theo.R Messages postés 575 Date d'inscription vendredi 11 juillet 2014 Statut Membre Dernière intervention 30 mars 2016 - 29 févr. 2016 à 16:13

Bonjour, je possède une feuille excel une colonne de 5200 données groupées (c'est à dire que la 1ère est dans la cellule A1 et la dernière dans la cellulle A5200). J'aimerais copier ces données sur une autre feuille mais je voudrais qu'il y ait une donnée toutes les 253 lignes. Comment faire pour ne pas faire ce travail donnée par donnée. Existe-t-il par exemple une option de collage "coller toutes les 253 lignes" ?

Merci d'avance

SB

A voir également:

Copie d'une cellule toutes les x lignes
Aller à la ligne dans une cellule excel - Guide
Copie cachée - Guide
Copie écran samsung - Guide
Excel cellule couleur si condition texte - Guide
American history x 2 ✓ - Forum Cinéma / Télé

1 réponse

Réponse 1 / 1

Theo.R Messages postés 575 Date d'inscription vendredi 11 juillet 2014 Statut Membre Dernière intervention 30 mars 2016 31
Modifié par Theo.R le 29/02/2016 à 15:12

Bonjour,

Vous pouvez dans une colonne juxtaposée calculer les lignes pour lesquelles il faudra copier la valeur, ensuite vous filtrez dessus et copier l'ensemble des lignes concernées.

La formule suivante à mettre en B1 puis à étirer affichera "ok" pour les lignes 1, 254, 507, 760, ... (toutes les 253 lignes en commençant par la ligne 1) :

=SI(MOD(LIGNE(A1)-1;9)=0;"ok";"")

bix
29 févr. 2016 à 15:29

Bonjour Théo,

Je te remercie pour ta réponse mais ta formule va seulement me permettre de voir marqué "ok" à chaque cellule où je dois rentrer une valeur. Mais ensuite je vais devoir faire à la main le "copier-coller" à chaque fois que ok est affiché. Soit dans mon cas 5199 fois (je ne prends pas en compte la cellule A1). C'est justement cette étape que je cherche à éviter..

Theo.R Messages postés 575 Date d'inscription vendredi 11 juillet 2014 Statut Membre Dernière intervention 30 mars 2016 31
29 févr. 2016 à 15:33

"ensuite vous filtrez dessus et copier l'ensemble des lignes concernées."

-> Vous n'avez qu'un copié-collé à faire pour avoir l'ensemble des lignes

bix
29 févr. 2016 à 15:55

Je te remercie beaucoup j'ai compris la manip. Seule chose, je n'arrive pas à étirer la ligne rapidement jusqu'à la ligne 1310400. Une astuce ?

bix
29 févr. 2016 à 15:57

Ah si c'est bon en fait.
Merci beaucoup pour ton aide :)

A bientôt

Theo.R Messages postés 575 Date d'inscription vendredi 11 juillet 2014 Statut Membre Dernière intervention 30 mars 2016 31
Modifié par Theo.R le 29/02/2016 à 16:03

Alt+F11, en haut à gauche sélectionner la feuille sur laquelle sont vos formules à étirer, puis coller ce code pour étirer la formule qui est en E1 jusqu'en E1310400 :

Sub test()
    Range("E1").AutoFill Destination:=Range("E1:E1310400"), Type:=xlFillDefault
    Range("E1:E1310400").Value = Range("A1:A1000").Value 'colle en valeurs pour éviter le recalcul trop long
End Sub

Ensuite, en gardant votre clic dans le texte collé (code vba), vous lancer la macro (flèche verte dans la barre d'action : "Exécuter Sub F5"

Attendre que ça traite toutes les lignes et voilà :-), attention ! par de CtrlZ possible, donc faites sur une copie au cas où ;)

Discussions similaires

Dimensions L x l x H : comment lire ces infos ?

Afficher toutes les lignes masquées excel

lien copié

Comment retrouver des lien copier sur sont téléphone

remettre toutes les colonnes et les lignes masquées