Copie d'une cellule toutes les x lignes

Résolu

bix -
Theo.R Messages postés 585 Statut Membre - 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

Afficher la suite

A voir également:

Copie d'une cellule toutes les x lignes
Site x - Guide
Sites X : Pornhub, YouPorn et Redtube sont de nouveau accessibles en France - Guide
Copie cachée - Guide
Écrire plusieurs lignes dans une cellule excel mac - Guide
Afficher toutes les lignes masquées excel ✓ - Forum Excel

1 réponse

Réponse 1 / 1

Theo.R Messages postés 585 Statut Membre 31

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

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 585 Statut Membre 31

"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

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

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

A bientôt

Theo.R Messages postés 585 Statut Membre 31

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

Copier un lien instagram

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

Retrouver liens copiés sur le téléphone

copie d'un lien dans le navigateur internet

Afficher toutes les lignes masquées excel

Votre réponse

Discussions similaires