Classement suite VBA sans espace

Bonjour,

Suite à la solution de " GMB " à mon problème, je reviens sur le forum pour un complément. J'ai ajouté une colonne classement pour mettre par ordre numérique ce classement avec une macro faite avec l'enregistreur.

Mais, sur ce classement, lorsque des participants n'ont aucune partie gagnée, ils se positionnent à la fin alors que l'idéal serait qu'ils se mettent à la suite.

Les colonnes " Q - S - T et U " sont normalement masquées, je les laisse apparentes sur le fichier joint.

Merci par avance pour votre contribution.

Cordialement

Bruno

Bonjour

a tester j'ais modifier ta macro

Sub Tri_resultats()
'
' Tri_resultats Macro
'
   derln = Range("T" & Rows.Count).End(xlUp).Row
Range("W6:X" & Rows.Count).ClearContents
    Range("T6:U45").Copy
    Range("W6").PasteSpecial Paste:=xlPasteValues
    Application.CutCopyMode = False

   For L = 6 To derln
      If Len(Range("W" & L).Value) > 1 Then
         T = T + 1
      Else
         Range("W" & L & ":X" & L).ClearContents
      End If
   Next
Range("W6:X" & derln + 1).Sort Range("X6"), xlAscending
End Sub

A+

Maurice

Bonsoir " Archer ",

En 1er lieu merci pour ta proposition de modification.

Par contre, je ne vois pas où loger précisément. As-tu la possibilité, STP, de me la positionner sur mon ficher afin de faire les tests.

Je t'en remercie par avance.

Bien cordialement

Bruno

bonjour

hum voila ton fichier

A+

Maurice

Bonjour " Archer ",

Cette macro répond parfaitement à mon besoin et je t'en remercie vivement.

Bien à toi

Bruno