Bonjour à tous,

M'inspirant grandement d'une formule fournit sur ce site, je souhaiterais pouvoir effectuer un tri automatique via la macro ci-dessous mais sans avoir à appuyer sur la touche entrée.

Pour être plus clair, lorsque j'applique le code suivant :

Option Explicit

'myDearFriend!  -  www.mdf-xlpages.com
Private Sub Worksheet_Change(ByVal Target As Range)
Static EnCours As Boolean       'Evite l'effet de boucle sur l'évènement Change()
    If EnCours Then Exit Sub
    If Not Application.Intersect(Target, Range("AB21:AC31")) Is Nothing Then
        EnCours = True
        Range("AB21:AC31").Sort Key1:=Range("AC22"), Order1:=xlDescending, Header:=xlYes, _
            OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
            DataOption1:=xlSortNormal
        EnCours = False
    End If
End Sub

... le tri automatique fonctionne très bien à partir du moment ou je modifie manuellement l'une de mes cellules présentes entre AC22 et AC31 et que je valide par la touche entrée.

Par contre, si la valeur de mes cellules présentes entre AC22 et AC31 proviennent d'une formule, et n'est donc pas entrée manuellement, le tri automatique ne se fait plus. Si je reclique sur une des cellules présentes entre AC22 et AC31 et que j'appuie sur la touche entrée, le tri s'effectue bien.

D'avance merci pour votre aide en espérant avoir été assez clair.

Mathieu.