Discussion :

[HIGGUINS]

Bonjour,

J'ai créé un tableau avec 9 colonnes (A à I) avec la 1ère ligne correspondant aux en-têtes de colonnes. Les nouveaux enregistrements viennent s'inscrire automatiquement sur la dernière ligne de mon tableau. Est-ce qu'il est possible à partir de ce moment-là qu'Excel reclasse le tableau par ordre alphabétique (tri sur la colonne A).

En vous remerciant d'avance de votre aide.

[Pierre Fauconnier]

Salut.

Voici le code générique

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Range("a:i").Sort key1:=Range("a1"), order1:=xlAscending, Header:=xlYes

Tu peux l'insérer dans un évènement (tel que Deactivate de la feuille, par exemple).

Attention. Si tu le places au sein de Change de la feuille, l'utilisateur risque d'être surpris, même s'il a alors le tri en temps réel.

[HIGGUINS]

Bonjour,

Je viens d'essayer le code et cela ne marche pas. Erreur 1004.

[Pierre Fauconnier]

Donne le code complet...

Si tu l'utilises au sein d'une procédure événementielle de la feuille de calcul concernée, il n'y a pas de raison qu'il provoque une erreur, sauf si ta feuille est protégée.

[HIGGUINS]

Etant nulle en VBA, j'ai simplement recopié le code ci-dessus dans la procédure évènementielle de ma feuille. Avec worksheet et deactivate.

[Pierre Fauconnier]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Private Sub Worksheet_Deactivate()
Range("a:i").Sort key1:=Range("a1"), order1:=xlAscending, Header:=xlYes
End Sub

Mets un copier-coller de ton code svp, on perdra moins de temps.