Dans cet article, vous apprendrez à trier automatiquement plusieurs feuilles à l’aide du code VBA.

{vide} Q) Je voudrais savoir comment je peux trier les données sur plusieurs feuilles de calcul (pas toutes).

[.underline] # Prenons un exemple: # Nous avons 3 feuilles (janvier, février et mars) et parmi elles, seule la feuille de mars doit être triée automatiquement lorsque vous entrez des informations dans la colonne A.

Cliquez sur l’onglet Développeur Dans le groupe Code, sélectionnez Visual Basic

img1

Entrez le code suivant dans ce classeur (pas dans une feuille). Cela exécutera le code dans toutes les feuilles de calcul.

Private Sub Workbook_SheetChange (ByValSh As Object, ByVal Target As Range)

En cas d’erreur Reprendre suivant

Sélectionnez le cas ActiveSheet.Name

Cas « Jan », « Fév »

Cas Else

If Not Intersect (Target, Range (« A: A »)) Is Nothing Then

Range (« A1 »). Sort Key1: = Range (« A2 »), _

Order1: = xlAscending, Header: = xlYes, _

OrderCustom: = 1, MatchCase: = False, _

Orientation: = xlTopToBottom

Fin si

Fin de la sélection

End Sub

img2

De cette façon, vous pouvez facilement trier les données par n’importe quelle colonne spécifique dans plusieurs feuilles lorsque vous tapez les informations. C’est un excellent moyen de gagner du temps et de garantir que le rapport ressemble à ce que vous aimeriez voir.