Trier Suivant Critére Mois d'une Date

[MuscatMimi]

Bonjour a tout le Forum

J'aimerai trier la col "A" dans ordre décroissant
suivant le critére "Mois" de la Date en Col A

Puis Insérer Ligne Vide ( Ex:Ligne A5) a l'ouverture du classeur

Merci par avance

Codialement

 

[James007]

Re : Trier Suivant Critére Mois d'une Date

Bonjour,

Pourquoi ne pas utiliser ton enregistreur de macros ... et effectuer une fois le processus pour visualiser comment VBA va coder tes actions ...

Cela te donnerait un premier point de départ ...

A +
🙂

 

[MuscatMimi]

Re : Trier Suivant Critére Mois d'une Date

Bonjour Jame007

oui bien sur pour la Ligne,ce n'était pas mon soucis majeur
Mais pour le Tri, Col A sur le Mois,,j'y arrive pas

Bon Dimanche

Cordialement

 

[James007]

Re : Trier Suivant Critére Mois d'une Date

Bonjour Christian,

Je viens de vérifier ... effectivement, tu ne peux rien faire ... à cause de cellules fusionnées ... ( qui sont systématiquement à bannir ...)

Une fois toutes supprimées ... tout fonctionne normalement ...

A +
🙂

 

[MuscatMimi]

Re : Trier Suivant Critére Mois d'une Date

er

j'avais pas vu les cell fusionnées
y'en a pas besoin

 

[James007]

Re : Trier Suivant Critére Mois d'une Date

Re,

Ta dernière réponse n'indique pas si tu as encore besoin d'aide ou pas ...

A tout hasard, ta macro pourrait ressembler à cela :

Sub Trier()
Dim der%
der = Feuil1.Cells(Feuil1.Rows.Count, 1).End(xlUp).Row
    'Trier
    Feuil1.Range("A4:E" & der).Sort Key1:=Range("A4"), Order1:=xlDescending, Header:=xlYes
    'Insérer ligne
    Feuil1.Rows("5:5").Insert Shift:=xlDown
End Sub

A +
🙂

 

[MuscatMimi]

Re : Trier Suivant Critére Mois d'une Date

Bonsoir Yann

Oui en effet, je n'ai pas signalé que j'avais ou pas ,encore besoin d'aide

En fait pour insérer ligne j'ai fais
et Pour le Tri,j'avais fait un bout de macro,mais ça fonctionnait mal
Donc j'ai pris ta Macro Trier,c'est bon

je matrise pas trop les Filtres, Tri, et Las Dates
faudra que je travail la dessus

Bonne soirée

Merci de ton aide

Cordialement