Version imprimable
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.
Salut.
Voici le code générique
Tu peux l'insérer dans un évènement (tel que Deactivate de la feuille, par exemple).Code:Range("a:i").Sort key1:=Range("a1"), order1:=xlAscending, Header:=xlYes
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.
Bonjour,
Je viens d'essayer le code et cela ne marche pas. Erreur 1004.
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.
:calim2:
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.
:oops:
Mets un copier-coller de ton code svp, on perdra moins de temps.Code:
2
3
:mrgreen:
Merci pour ta réponse. Cela marche. Erreur inattention. J'avais mal indiqué le nombre de ligne.
Merci bcp.
Perso, il n'y a pas de nombre de lignes dans mon code...
Mais bon, si ta solution te convient, tant mieux. Je suppose que tu as des données sous les lignes à trier...
Bonjour,
Au début j'ai saisie le code suivant dans la procédure évènementielle:
Private Sub Worksheet_Deactivate()
Range("a:i").Sort key1:=Range("a1"), order1:=xlAscending, Header:=xlYes
End Sub
Cela me met le message suivant : Erreur exécution1004 : La méthode sort de la classe range à échoué.
Si je saisie ce code :
Private Sub Worksheet_Deactivate()
Range("a1:i1580").Sort key1:=Range("a1"), order1:=xlAscending, Header:=xlYes
End Sub
Cela marche. Je me suis posé la question justement pour les données rentrée à la suite de la ligne 1580. J'ai rentré 5 enregistrements supplémentaires à la suite. Il me les prends en compte puisque qu'il me les classes dans le tableau. Par contre si je supprime des enregistrements et donc ma dernière ligne de mon tableau est la 1575, alors de nouveau j'ai ce message d'erreur.