trier un fichier pour supprimer des lignes

[sony]

Bonjour j’ai un fichier qui se présente avec deux colonnes, ainsi :

772010000
772010000
772010000
772010000
772010000 16
772010001
772010001
772010001
772010001
772010001
772010001 79
772010004
772010004
772010004
772010004
772010004 9

Je voudrais supprimer les lignes en trop pour l’avoir sous cette forme plus synthétique:

772010000 16
772010001 79
772010004 9

 

[andré]

Salut sony,

Sélectionner la colonne à trier.
F5 / Cellules / Cellules vides / OK
Edition / Supprimer / lignes entières / OK

Pour en faire une petite macro : enregistrer dès que la colonne est sélectionnée.

Ândré.

 

[Moa]

Ce qui pourrait donner :

Sub Macro1()
Range("B1:B18").Select
Selection.SpecialCells(xlCellTypeBlanks).Select
Selection.EntireRow.Delete
End Sub


@ +

Moa

 

[sony]

merci ça marche