Modifications automatiques d'un tableau
quentin310
Messages postés
10
Statut
Membre
-
via55 Messages postés 14393 Date d'inscription Statut Membre Dernière intervention -
via55 Messages postés 14393 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
J'aurais besoin d'aide pour modifier automatiquement un tableau Excel :
1) insérer une ligne entre chaque lignes d'un tableau ;
2) déplacer une cellule dans cette nouvelle ligne ;
3) insérer une ligne vierge ;
Le tout automatiquement :
Quelqu'un aurait-il la solution?
Merci d'avance,
Quentin
J'aurais besoin d'aide pour modifier automatiquement un tableau Excel :
1) insérer une ligne entre chaque lignes d'un tableau ;
2) déplacer une cellule dans cette nouvelle ligne ;
3) insérer une ligne vierge ;
Le tout automatiquement :
Quelqu'un aurait-il la solution?
Merci d'avance,
Quentin
1 réponse
-
Bonjour
Macro à mettre dans un module (ALT+F11 pour ouvrir éditeur puis Insertion Module copier et coller la macro, fermer editeur
Pour lancer la macro depuis la feuille : Onglet Developpeur - Macros choisir insertion et Executer
Sub insertion() For n = 6 To 2Step -1 ' boucle de la ligne 6 à la 2 en remontant (à modifier si plus de lignes) ' selection de la ligne suivante et insertion Rows(n + 1 & ":" & n + 1).Select Selection.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove ' Coupe valeur en F Range("F" & n).Select Selection.Cut ' Colle valeur en D ligne en dessous Range("D" & n + 1).Select ActiveSheet.Paste Next End Sub
Cdlmnt
Via
