Excel 07 Modifier Macro

Question

Bonjour,
J'ai une macro réaliser sur un autre post par Pilas31 que je voudrai modifier si c'est possible.
Cette macro me copie un ensemble de cellule dans une autre feuille à la fin de ma liste.

J'ai 4 colonnes.
j'aimerai que la macro m'insère, entre 2 lignes, la ligne au bon endroit en prenant en compte la liste de la colonne A, puis la liste de la colonne B, puis la liste de la colonne C, puis la liste de la colonne D.

J'espère être clair dans ce que je cherche à faire.
Merci.

Cécile · Answer

Oups!
J'ai oublié la macro. La voilà, si cela peut servir.
Sub transpose_dans_tableau()
    Sheets("Formulaire").Range("B1:B9").Copy
    Sheets("Liste").Select
    If Range("A2").Value = "" Then
        Range("A2").Select
    Else
        Range("A" & Range("A1").End(xlDown).Row + 1).Select
    End If
    Selection.PasteSpecial Paste:=xlPasteAllExceptBorders, _
    Operation:=xlNone, SkipBlanks:=False, Transpose:=True
    Sheets("Formulaire").Range("B1:B9").ClearContents
    Range("A1").Select
End Sub

eriiic · Answer

Bonsoir,

Le plus simple est de laisser le collé en fin de liste et d'enchainer par un tri sur les colonne D, C et B puis un autre tri sur A.
Fais-le une fois manuellement en ayant démarré l'enregistreur de macro et tu auras les fonctions et syntaxes à utiliser.

eric

Excel 07 Modifier Macro

2 réponses

Discussions similaires

Newsletters