Macro Excel

Bonjour et félicitation pour ce site,

je cherche de l'aide pour réaliser une macro :

• je dispose d'un fichier d'environs 600 lignes
• la premiere colone corresponds à des noms de clientrs ' ils reviennent plusisuers fois)
• la 2ém colonne correspond a des montants dus

je souhaiterais une macro qui me fasse la somme des montans dus par client.

cette macro pourrait trier les clients pour les reunir par groupe (chq groupe correspondant au même cient) et en creant une ligne en dessous de chaque groupe pour faire apparaitre cette somme des montants dus

petite précision : je souhaite en résltat :

• mr a 2
• mr a 3
• mr a 2
• total mr a 7

• mr b 3
• mr b 2
• total mr b 4

merci pour votre aide bien cordialement

Bonjour faustine2005,

Voilà une macro qui utilise les fonctions Tri et Sous-totaux d'Excel :

Sub Tri_Totaux()
    Dim Lignes As Long

    Lignes = Range("A1").End(xlDown).Row
    If Lignes > 65000 Then Lignes = 2
    Range("A1:B" & Lignes).Sort Key1:=Range("A2"), Order1:=xlAscending, Header:= _
        xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
        DataOption1:=xlSortNormal
    Range("A1").Subtotal GroupBy:=1, Function:=xlSum, TotalList:=Array(2), _
        Replace:=True, PageBreaks:=False, SummaryBelowData:=True
End Sub

S'il faut supprimer les sous-totaux par la suite :

Sub EnleveTotaux()
    Range("A1").RemoveSubtotal
End Sub

bonjour et merci pour la macro c'est tres sympa d'avoir plancher sur mon problème.

qd je lance ta macro, j'ai un msg d'erreur : "erreur de compilation argument trouvé introuvable" ......et le terme suibvant se met en surbrillance " DataOption1:= "

si tu as le tps e jeter un oeil

je t'en remercie par avance

@+

Essaye juste de supprimer cette ligne et la fin de ligne précédente : ", _").

je te remercie un peu tardivement mieux vaut tard que jamais car ca fonctionne merci bcp

et meilleur voeux pour 2006