Mise en forme VBA recopie

[Marjo2]

Bonjour,

J'ai un export et je n'arrive pas à mettre mes morceaux de codes bout à bout.
Quelqu'un pourrait-il m'aider svp ?

Insère 3 colonnes
Worksheets("EXPORT").Select
Columns(1).Insert Shift:=xlToRight
Columns(2).Insert Shift:=xlToRight
Columns(3).Insert Shift:=xlToRight

Copie la ligne qui commence par C en colonne 1

On recopie jusqu'à la prochaine

Supprime les lignes dont la colonne N est vide

Merci d'avance

 

[Marjo2]

Si je fais ça il manquera un peu de chiffre d'affaires 🙂

 

[job75]

Re,

Pour tester ma macro j'ai recopié le tableau source sur 55 000 lignes.

L'exécution prend 200 secondes chez moi, c'est très long, comme prévu.

A+

 

[Marjo2]

Merci Job mais je vais garder la solution de Efgé.
Je l'étudie pour la mettre en place dans un autre fichier

 

[Efgé]

RE

Re,

Pour tester ma macro j'ai recopié le tableau source sur 55 000 lignes.

L'exécution prend 200 secondes chez moi, c'est très long, comme prévu.

A+

Après même test j'arrive à moins de 1,31 seconde 😉

Cordialement

 

[Marjo2]

Bonjour messieurs,
Je viens vous redemander votre aide. J'ai voulu adapter la macro pour mise en forme mais je n'y arrive pas. Pour me former, vous serez t'il possible de mettre des commentaires dans les étapes de l'élaboration de la macro svp ?

J'ai inséré 2 colonnes en A
Ce qui est en gras, je les mis dans les colonnes fraîchement ajouté mais 1 ligne en dessous.

Supprimer les lignes vides​

Recopie vers le bas jusqu'à la prochaine ligne en gras

En colonne C et D, si cellule avec du texte alors recopie vers le bas jusqu'à la prochaine non vide
J'ai décalé de 2 colonnes vers la droite, ce qu'il y avait en format date (à partir de la date)
Je recopie vers le haut jusqu'à cellule non vide des colonnes C et D

Le fichier comporte beaucoup beaucoup de lignes

Merci d'avance