Trier colonne

Bonjour

j 'ai encore besoin D'aide

il me faudrait trier une colonne je vous joint la feuille c'est plus clair

merci d'avance

bonjour,

solution via une macro

Merci c'est presque cela car PREHUMAIN,E n 'y est pas il contient une virgule ???

re-bonjour,

du coup si virgule est majuscule , j'ai également considéré que les caractères spéciaux sont aussi à prendre en compte.

Non non seulement les mots tout en majuscule mais qui peuvent contenir une virgule ou un point ….

merci.

j'ai essayé avec des mots en majuscule avec des accents ils ne sont pas repris non plus...

bonsoir,

code adapté, note que ta demande concerne une sélection (filtre) et non un tri.

Sub aargh()
    Dim ok As Boolean
    dl& = Cells(Rows.Count, 1).End(xlUp).Row
    Range("B:B").ClearContents
    k& = 0
    For i& = 1 To dl
        s$ = Cells(i, 1)
        ok = True
        For j& = 1 To Len(s)
            If Not Mid(s, j, 1) Like "[A-Z,.'ÉÈÊÀÙÂÎÔÛ]" Then ok = False: Exit For
        Next j
        If ok = True Then
            k = k + 1
            Cells(k, 2) = s
        End If
    Next i
End Sub
Rechercher des sujets similaires à "trier colonne"