Tri colonne A + séparation par une ligne vide

Mince alors, je dois avoir une erreur quelque part?

j'ai essayé à plusieurs reprises , mis aussi

Application.ScreenUpdating = False

Je vais encore refaire des essaies

bizarre comme c'est bizarre

J'ouvre le fichier puis lance la macro: temps 0,09 secondes

J'ouvre le fichier puis affiche l'aperçu d'impression et lance la macro 11secondes

dés que je lance l'aperçu avant ou apres la macro le temps augmente...

pas grave je vais me debrouiller

merci pour tout

bon apres midi

Oups : 0,9 sec

pas compris votre

"Oups:0,9 sec" ?

Comment fait-on pour mettre les variables à zéro (RAZ)?

merci

J'avais écrit 09 sec et en fait ç'était 0,9 sec. Mais comme tu as posté entre temps, ce n'est plus très compréhensible. Désolé.

Daniel

Bonjour,

Je vient de retrouver une macro qui tri avec un double_clic sur A1, B1,ou C1 etc.

Peut-on insérer dans ce tableau une ligne après chaque changement?

Option Explicit
'--------------------------
'double clic sur A1= tri par colonneA
'double clic sur B1= tri par colonneB
'double clic sur C1= tri par colonneC
'double clic sur D1= tri par colonneD
'-------------------------------------

Private Sub Worksheet_BeforeDoubleClick(ByVal sel As Range, Cancel As Boolean)
Dim deb As Long

 Application.ScreenUpdating = False

  deb = Timer
    If sel.Row > 1 Then Exit Sub
    Cancel = True
    With ActiveWorkbook.Worksheets("base").ListObjects("Tableau1").Sort
        With .SortFields
            .Clear
            .Add Key:=Range("Tableau1[" & sel.Value & "]"), SortOn:=xlSortOnValues, _
                Order:=xlAscending, DataOption:=xlSortNormal
        End With
        .Header = xlYes
        .MatchCase = False
        .Orientation = xlTopToBottom
        .SortMethod = xlPinYin
        .Apply
    End With

     'Temps d'exécution de la macro affichée en F1
    Range("F1").Select: ActiveCell.FormulaR1C1 = Timer - deb
End Sub

merci

re,

je n'ai pas des problèmes avec ces tries, mais pourquoi insérer des lignes vides, cela n'a pas de sens

re

Pour séparer les N° de colis (colonne A)

mais pas d'importance

je vais me débrouiller autrement

merci

Bonne soirée