Macro pour Trier cellules sélectionnées

C

CHALET53

XLDnaute Barbatruc

• 11 Février 2013

• #2

Re : Macro pour Trier cellules sélectionnées

Bonjour,

Un essai

a+

 

Pièces jointes

• Tony1.xlsm

  307.8 KB · Affichages: 63

Vote positif 0 Vote négatif

Tony44

XLDnaute Occasionnel

• 11 Février 2013

• #3

Re : Macro pour Trier cellules sélectionnées

c'est pas totalement ça.
en fait le trie s'effectue toujours par rapport à la colonne D mais la plage de cellule varie toujours.
la plage de cellule peut commencer en ligne 6 jusq'à la ligne 9 puis une autre plage de la ligne 15 jusqu'à la ligne 25 ... àa varie toujours.

 

Vote positif 0 Vote négatif

C

CHALET53

XLDnaute Barbatruc

• 11 Février 2013

• #4

Re : Macro pour Trier cellules sélectionnées

Peut-être comme ceci

a+
Faire préalablement une sélection et ensuite : Lance

 

Pièces jointes

• Tony2.xlsm

  309.6 KB · Affichages: 66

Vote positif 0 Vote négatif

pierrejean

XLDnaute Barbatruc

• 11 Février 2013

• #5

Re : Macro pour Trier cellules sélectionnées

Bonjour Tony

Salut Chalet

A tester:

Code:

Sub Macro1()
  x = Selection.Row
  y = Selection.Rows.Count + x
  MsgBox (x & "  " & y - 1)
    ActiveWorkbook.Worksheets("Feuil1").Sort.SortFields.Clear
    ActiveWorkbook.Worksheets("Feuil1").Sort.SortFields.Add Key:=Range("D" & x & ":D" & y) _
        , SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal
    With ActiveWorkbook.Worksheets("Feuil1").Sort
        .SetRange Selection
        .Header = xlGuess
        .MatchCase = False
        .Orientation = xlTopToBottom
        .SortMethod = xlPinYin
        .Apply
    End With
End Sub

 

Vote positif 0 Vote négatif

Tony44

XLDnaute Occasionnel

• 11 Février 2013

• #6

Re : Macro pour Trier cellules sélectionnées

je teste et vous tiens au courant.
merci d'avance

 

Vote positif 0 Vote négatif

S

Si...

XLDnaute Barbatruc

• 11 Février 2013

• #7

Re : Macro pour Trier cellules sélectionnées

salut

autre façon de procéder (événementielle sélection : ouvre un userform pour choisir l'ordre).

 

Pièces jointes

• UsF Tri plage sélectionnée.xls

  41.5 KB · Affichages: 59

Vote positif 0 Vote négatif

Tony44

XLDnaute Occasionnel

• 12 Février 2013

• #8

Re : Macro pour Trier cellules sélectionnées

Merci "Si..."
ta méthode me convient bien, je vais juste essayer de l'adapter pour que je n'ai pas l'userform à chaque fois que je sélectionne une plage de cellule mais je cherche plutôt à faire un bouton qui lancerait la procédure.

 

Vote positif 0 Vote négatif

Tony44

XLDnaute Occasionnel

• 12 Février 2013

• #9

Re : Macro pour Trier cellules sélectionnées

petite question, comment voit on dans le language VBA, je ne vois rien ?

 

Dernière édition: 12 Février 2013

Vote positif 0 Vote négatif