déplacer des cellules Fermé

Question

Bonjour, 

Bonjour
voilà , j'ai une colonne d'environ 200 lignes avec des codes , 
des prix , des produits etc.. qui se présente ainsi:

A1  74782
A2  3561920734057
A3  BEAUX ROUGE CARNETS CA TP LP REFLETS - PAYSAGES DU MONDE 12 
A4  TP 20G
A5  22
A6  0
A7  10,2
A8  75928
A9  3561920761206
A10 BEAUX ROUGE CARNETS UNE MOISSON DE CEREALES 12 TP 20G BLOC
A11 2
A12 0
A13 10,2
A14 63362
A15 3561920660363
A16 BEAUX ROUGE TIMBRES MARIANNE MN DM EUROPE 1 TP 20G
A17 34
A18 0
A19 1,1


donc j'aurai voulu une macro pour déplacer les cellules A1 A2 
A4 A5 A6 A7  successivement à droite de la cellule A3 ou se trouve le nom du produit ensuite déplacer les 
cellules A8 A9 A11 A12 A13 successivement à doite de la cellule A10 ensuite 
deplacer A14 A15 A17 A18 A19 successivement à droite de la cellule A16 etc...
et enfin supprimer toutes les lignes vides
je vous en remercie par avance
Bonne journée

PHILOU10120 · Answer

Bonjour Pactoine2

Sans macro
colonne B mettre cette formule =INDIRECT("A"&LIGNE())
colonne C =INDIRECT("A"&LIGNE()-2)
colonne D =INDIRECT("A"&LIGNE()-1) 
colonne E =INDIRECT("A"&LIGNE()+1)
colonne F =INDIRECT("A"&LIGNE()+2)
colonne G =INDIRECT("A"&LIGNE()+3)
colonne H =INDIRECT("A"&LIGNE()+4)
tirer la ligne de formules vers le bas

Sélectionner l'ensemble des lignes avec les formules et faire un copier coller valeurs

Sélectionner les lignes inutiles et supprimer

ccm81 · Answer

Bonjour

Pas vraiment besoin de macro
http://www.cjoint.com/c/GIvmmrAtwWB

Cdlmnt

Déplacer des cellules

2 réponses

Discussions similaires