tri par section d'une colonne

[jeanmimi62]

bonjour
je souhaite trier une colonne par section et ceci en un click sur un bouton
dans l'exemple joint je souhaite tri la colonne B de la cellule B1 à B4 et de la cellule B6 à B9
en vous remerciant de votre aide

 

[JCGL]

Re : tri par section d'une colonne

Bonjour à tous,

Peux-tu essayer avec :

Option Explicit

Sub Tri()
Application.ScreenUpdating = 0
Range("A1:B4").Sort Key1:=Range("B1"), Order1:=xlAscending, Header:=xlGuess
Range("A6:B9").Sort Key1:=Range("B6"), Order1:=xlAscending, Header:=xlGuess
Range("C1").Select
End Sub

A + à tous