problème de tri ...

[cédric]

Bonjour,

- En colonne A, j'ai une liste de documents (par exemple)
- En colonne B, j'indique par une croix (par exemple) les documents que je souhaite envoyer ...
- En colonne C (par exemple), je souhaite obtenir à la suite (sans espace) la liste des documents sélectionnés ...

Cela me permet de créer un document listant ce que j'envoie ...

Quelqu'un a une solution ?

Merci beaucoup par avance !

NB : Pas de tri, ni de filtre ...

 

[Lord Nelson]

Salut Cédric,

Voici une macro qui te permettra de la faire :

Dim DerLigne As Long, Ligne As Long
Dim CL As Range
DerLigne = Range("A65536").End(xlUp).Row
Ligne = 1
Range("C1:C" & CStr(DerLigne)).ClearContents
For Each CL In Range("B1:B" & CStr(DerLigne))
If CL.Text = "X" Then
Range("C" & CStr(Ligne)) = CL.Offset(0, -1)
Ligne = Ligne + 1
End If
Next

A+
Horatio