sélectionner une zone sans les cellules vides pour faire un tri alpha

  • Initiateur de la discussion Initiateur de la discussion pascal21
  • 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 !

pascal21

XLDnaute Barbatruc
bonjour le forum
j'ai réalisé avec l'enregistreur de macro une macro pour faire un tri alphanumérique sur les colonnes B et C
(colonne C à trier)
les données de ses colonnes sont évolutives en nombre (actuellement de la ligne 1 a 100)
j'ai donc choisi une zone B1:c117 mais les cellules vides se mettent en haut de la feuille
quel code permet de sélectionner que la zone où les cellules de la colonne B(C contient une formule) sont renseignées
merci
je vous mets le code (non épuré de l'enregistreur)
Code:
Sub tri_numerique()'
' tri_numerique Macro
'


'
    Range("B1:C117").Select
    ActiveWorkbook.Worksheets("Syntèse").Sort.SortFields.Clear
    ActiveWorkbook.Worksheets("Syntèse").Sort.SortFields.Add Key:=Range("C1:C117" _
        ), SortOn:=xlSortOnValues, Order:=xlDescending, DataOption:=xlSortNormal
    With ActiveWorkbook.Worksheets("Syntèse").Sort
        .SetRange Range("B1:C117")
        .Header = xlGuess
        .MatchCase = False
        .Orientation = xlTopToBottom
        .SortMethod = xlPinYin
        .Apply
    End With
    ActiveWindow.ScrollRow = 96
    ActiveWindow.ScrollRow = 77
    ActiveWindow.ScrollRow = 13
    ActiveWindow.ScrollRow = 7
    ActiveWindow.ScrollRow = 2
    Range("I2:J37").Select
    ActiveWorkbook.Worksheets("Syntèse").Sort.SortFields.Clear
    ActiveWorkbook.Worksheets("Syntèse").Sort.SortFields.Add Key:=Range("J2:J37") _
        , SortOn:=xlSortOnValues, Order:=xlDescending, DataOption:=xlSortNormal
    With ActiveWorkbook.Worksheets("Syntèse").Sort
        .SetRange Range("I2:J37")
        .Header = xlGuess
        .MatchCase = False
        .Orientation = xlTopToBottom
        .SortMethod = xlPinYin
        .Apply
    End With
 
End Sub
je ne peux pas bettement masquer les lignes vides car j'ai d'autres tris dans d'autres colonnes
edit fichier simplifié transmis
 

Pièces jointes

Dernière édition:
Re : sélectionner une zone sans les cellules vides pour faire un tri alpha

re bonjour
merci
entre temps j'ai trouvé un code sur le site de Boisgontier permettant de faire remonter les valeurs donc sujet resolu
mais j'ai un autre soucis voila que je n'arrive plus a ouvrir mon classeur je fais un autre post
 
Re : sélectionner une zone sans les cellules vides pour faire un tri alpha

Bonsour®
je ne peux pas bettement masquer les lignes vides car j'ai d'autres tris dans d'autres colonnes
edit fichier simplifié transmis

sans connaître la structure du fichier originel...
il apparaît dans la colonne A des valeurs de différents Types : numérique, Texte, Vide
certaines cellules paraissant vides ne le sont pas, sans pouvoir identifier leur contenu ??? 😡 🙁

j'ai donc fait une conversion au format standard de la colonne A (données > convertir)
- puis une extraction sans doublons dans la colonne C
- ajouté une formule de dénombrement en colonne D
- ajouté un MEFC
- puis fini de trier D:C sur colonne D décroissant
 

Pièces jointes

- 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 listbox
Réponses
18
Affichages
284
Réponses
17
Affichages
1 K
Réponses
6
Affichages
1 K
Réponses
11
Affichages
780
Réponses
1
Affichages
1 K
Réponses
1
Affichages
821
Retour