Trier colonne

Bonjour,

je voudrais trier automatiquement la colonne noms dès que je rajoute un nom

merci de votre réponse

jean yves

Bonjour le forum,

Private Sub Worksheet_Change(ByVal Target As Range)
  If Target.Column = 5 And Target.Count = 1 Then
    nom = Target
    [E4:K1000].Sort key1:=[E3]
    [E4:E1000].Find(what:=nom).Select
  End If
End Sub

je te remercie mais il y a un petit probléme

je voudrais que toutes la ligne suive

jean yves

Bonjour benoist,

Salut mbbp,

Voir si cela convient.

Cordialement.

merci c'est parfait

amitiés

jean yves

Bonjour mdo100,

Bravo pour ton code.

j'ai mis aussi A à la place de E

et ça fonctionne aussi

merci à vous deux

amitiés

re

autant pour moi

le code de mdo100, sur une longue liste a chaque fois que l'on tape un mot dans une case une case revient à la premire ligne

pas pratique sur 300 lignes

par contre le code de mbbp c'est nikel en mettant la lettre A pour avoir la ligne entière

amitiés

jean yves.