Soucis classement

[GGPS58]

Bonsoir à tous,
J'ai besoin de classer des données qui sont sous forme de tableau (voir fichier joint ... plus explicite).
Je pensais y arriver facilement mais malheureusement ce n'est pas le cas.
J"ai essayé les mathodes de tri conventionnelles mais cela ne donne rien.
Je souhaites arriver à automtiser la procédure en VBA ... une fois que j'aurais une solution.
Sauriez-vous me conseiller ?

D'avance merci.

 

[JNP]

Re : Soucis classement

Bonsoir GGPS58 🙂,
Teste cette petite macro

Sub Test()
Dim I As Integer, J As Integer, K As Integer
K = InputBox("Nombre de lignes ?")
J = InputBox("Première ligne ?")
Do
For I = J + 1 To J + K - 1
Cells(I, 1) = Cells(J, 1)
Next I
J = J + K
Loop While Cells(J, 1) <> ""
End Sub

nombre de lignes à rentrer 3, première ligne 2.
Après, ton tri devrait fonctionner, même s'il sera alphanumérique et non pas chronologique 😛...
Bonne soirée 😎

 

[GGPS58]

Re : Soucis classement

Merci, c'est tout bête (simple), mais d'une efficacité énorme.
Du coup je m'en veux de ne pas y avoir pensé ...

MERCI

 

[JCGL]

Re : Soucis classement

Bonjour à tous,

Un essai qui rempli les cellules vides en A

Le tri sera possible

A+ à tous

Édition : Salut JNP 🙂