XL 2021 Trier sans ligne vide

[VieuxSeb]

Bonjour à tous,

Je n'arrive pas à trouver de solution, sur le tableau "MAGASIN", j'ai un tri en colonne F de Z à A.

Quand je ne sélectionne que la zone 1, j'aimerais que le tri reste automatiquement de Z à A sur la colonne F et sans les lignes vide en haut.

Si je fais un tri manuel avec le filtre automatique de Z à A, j'ai les lignes vides en haut

Merci de votre aide

Sébastien

 

[Gégé-45550]

Bonjour à tous,

Je n'arrive pas à trouver de solution, sur le tableau "MAGASIN", j'ai un tri en colonne F de Z à A.

Quand je ne sélectionne que la zone 1, j'aimerais que le tri reste automatiquement de Z à A sur la colonne F et sans les lignes vide en haut.

Si je fais un tri manuel avec le filtre automatique de Z à A, j'ai les lignes vides en haut

Merci de votre aide

Sébastien

Bonjour,
Une possibilité en PJ, voir colonne I et gestionnaire de noms.
Cordialement,

 

[djidji59430]

Bonjour à tous,

Si les lignes te chagrinent; tu filtres la colonne f en retirant les vides !

Crdlmt

 

[VieuxSeb]

Bonjour

Merci job75, mais cela ne fonctionne pas, je n'ai plus les vraies valeurs a 0, et je n'ai plus les valeurs négatives.

Merci Gégé 45550, je vais voir pour faire comme cela.

Sébastien

 

[job75]

Bonjour,

J'ai supprimé mon message, il était à côté de la plaque.

A+

 

[VieuxSeb]

Bonjour

Gégé 45550, j'ai un problème avec la solution.

Quand j'ai 2 valeurs identiques (en F), il n'y a qu'un seul résultat (en L).

Sébastien

 

[Gégé-45550]

Bonjour

Gégé 45550, j'ai un problème avec la solution.

Quand j'ai 2 valeurs identiques (en F), il n'y a qu'un seul résultat (en L).

Sébastien

Bonjour,
cela me semble normal, non ?
Quel peut être l'intérêt d'avoir deux valeurs identiques en F ?
Cordialement,

 

[job75]

Bonjour le forum,

Je reviens sur ce fil avec une solution VBA :

Private Sub Worksheet_Calculate()
Application.ScreenUpdating = False
Application.EnableEvents = False
With [Tableau13].ListObject.Range
    .Columns(5).Replace """""", "-9^9"
    .Sort .Columns(5), xlDescending, Header:=xlYes 'tri sur la 5ème colonne
    .Columns(5).Replace "-9^9", """"""
End With
Application.EnableEvents = True
Application.ScreenUpdating = True
End Sub

Triez la colonne F.

A+

 

[VieuxSeb]

Bonjour

Merci job75, je vais regarder.

Sébastien

 

[job75]

La macro précédente trie systématiquement de Z à A.

Si l'on veut pouvoir aussi trier de A à Z il suffit d'ajouter une 3ème ligne au code :

Private Sub Worksheet_Calculate()
With [Tableau13].ListObject.Range
    If IsNumeric(.Cells(2, 5)) Then Exit Sub
    Application.ScreenUpdating = False
    Application.EnableEvents = False
    .Columns(5).Replace """""", "-9^9"
    .Sort .Columns(5), xlDescending, Header:=xlYes 'tri sur la 5ème colonne
    .Columns(5).Replace "-9^9", """"""
    Application.EnableEvents = True
    Application.ScreenUpdating = True
End With
End Sub

 

[VieuxSeb]

Bonjour

Merci job75