Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

XL 2021 Trier sans tenir compte des cellule vides mais avec formule

Créer une discussion
  • Initiateur de la discussion Initiateur de la discussion GregN
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S'inscrire
G

GregN

XLDnaute Nouveau
Bonjour à tous,
J'aurais besoin de votre aide svp car je n'arrive pas à trouver comment faire pour trier la colonne H par ordre décroissant sans tenir compte des cellules vides mais dans lesquelles il y a une formule.
Je mets le fichier en PJ.
Merci énormément pour votre aide
 

Pièces jointes

Solution
Essayez avec :
VB: 
Sub TempsRestant_Croissant_Essai()
    Range("B13:I101").Sort Key1:=[H13], Order1:=xlAscending, Header:=xlYes
    DL = [B65500].End(xlUp).Row
    Range("B13:I" & DL).Sort Key1:=[H13], Order1:=xlAscending, Header:=xlYes
End Sub
Sub TempsRestant_Décroissant_Essai()
    Range("B13:I101").Sort Key1:=[H13], Order1:=xlAscending, Header:=xlYes
    DL = [B65500].End(xlUp).Row
    Range("B13:I" & DL).Sort Key1:=[H13], Order1:=xlDescending, Header:=xlYes
End Sub
J'obtiens :

et
Trier par date Trier par votes
Bonjour Greg, et bienvenu sur XLD,
Peut être en trichant :
1- Tri sur toute la colonne pour remonter les valeurs en haut
2- Calcul du nombre de cellules occupées
3- Sur celle plage tri ascendant ou descendant.
Avec par ex pour la colonne Clients :
VB: 
Sub Client_Croissant_Essai()
    Range("B13:I101").Sort Key1:=[B13], Order1:=xlDescending, Header:=xlYes
    DL = [B65500].End(xlUp).Row
    Range("B13:I" & DL).Sort Key1:=[B13], Order1:=xlAscending, Header:=xlYes
End Sub
Sub Client_Décroissant_Essai()
    Range("B13:I101").Sort Key1:=[B13], Order1:=xlDescending, Header:=xlYes
    DL = [B65500].End(xlUp).Row
    Range("B13:I" & DL).Sort Key1:=[B13], Order1:=xlDescending, Header:=xlYes
End Sub
 

Pièces jointes

Vote positif 0 Vote négatif
Essayez avec :
VB: 
Sub TempsRestant_Croissant_Essai()
    Range("B13:I101").Sort Key1:=[H13], Order1:=xlAscending, Header:=xlYes
    DL = [B65500].End(xlUp).Row
    Range("B13:I" & DL).Sort Key1:=[H13], Order1:=xlAscending, Header:=xlYes
End Sub
Sub TempsRestant_Décroissant_Essai()
    Range("B13:I101").Sort Key1:=[H13], Order1:=xlAscending, Header:=xlYes
    DL = [B65500].End(xlUp).Row
    Range("B13:I" & DL).Sort Key1:=[H13], Order1:=xlDescending, Header:=xlYes
End Sub
J'obtiens :

et
 
Vote positif 0 Vote négatif
Solution
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

  • Question Question
XL 2021 tri par lignes
Réponses
12
Affichages
134
job75
G
  • Question Question
XL 2019 Somme de cellules non vides sur une période
Réponses
3
Affichages
175
job75
A
  • Question Question
Microsoft 365 Déplacer sans trier
Réponses
6
Affichages
231
sylvanu
Y
  • Résolu(e)
XL 2016 4 Messages dans des formules différentes à imbriquer dans une seule formule SI.est vide.ET.ET
Réponses
6
Affichages
104
YGU1
Y
C
  • Question Question
Microsoft 365 Formule pour remplacer des cellules vides
Réponses
3
Affichages
285
JHA
J
S
  • Résolu(e)
XL 2019 Trier un tableau en fonction de critères définis
Réponses
6
Affichages
443
sum01
S
B
  • Question Question
XL 2019 trouver le plus grand numéro
Réponses
11
Affichages
477
Blafi
B
G
  • Question Question
Microsoft 365 Trier les noms par dates dans Excel : gérer les doublons pour des dates identiques
Réponses
6
Affichages
237
C'est papy Mougeot !
  • Résolu(e)
Microsoft 365 Trier sur le deuxième champ dans un TCD
2
Réponses
15
Affichages
1 K
xUpsilon
P
  • Résolu(e)
Microsoft 365 Macro Excel pour effectuer des opérations sur les lignes et cellules adjacentes
2
Réponses
19
Affichages
375
Perceval973
P
  • Question Question
Microsoft 365 créer des feuilles automatiques et une formule avec condition de remplissage
Réponses
2
Affichages
262
luno123
D
  • Résolu(e)
Microsoft 365 TRIER SUR FEUILLE PROTEGER
Réponses
8
Affichages
561
dd_76
D
V
  • Résolu(e)
XL 2021 Trier sans ligne vide
Réponses
10
Affichages
744
VieuxSeb
V
E
  • Résolu(e)
Microsoft 365 ComboBox "dynamiques" sans doublon sur plusieurs colonnes
Réponses
2
Affichages
283
ExcLnoob
E
M
  • Question Question
Microsoft 365 conditions SI et cellule filtrée
Réponses
1
Affichages
336
sylvanu
G
  • Question Question
XL 2016 recherche formule adaptée
Réponses
6
Affichages
387
Geyka
G
Z
  • Résolu(e)
Microsoft 365 (résolu) Position d'une valeur max dans un tableau avec ex-aequo
2
Réponses
15
Affichages
709
crocrocro
C
E
  • Question Question
Microsoft 365 Formule pour enlever les cellules vides
Réponses
4
Affichages
608
Erakmur
E
A
  • Question Question
Microsoft 365 créer un lien vers une cellule dont la ligne est fluctuante
Réponses
3
Affichages
143
AtTheOne
  • Résolu(e)
Microsoft 365 Concaténer colonne d'un tableau des cases visibles uniquement
Réponses
12
Affichages
315
Jean-Eric
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…