Comment détruire des lignes qui suivent des lignes vides

Résolu
Ju@nita Messages postés 163 Date d'inscription   Statut Membre Dernière intervention   -  
Ju@nita Messages postés 163 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,

J'ai excel 2010. Avant d'exécuter une macro de triage, mon fichier contient des informations inutiles dont j'aimerais les effacer au tout début de la macro sinon, elles se feront trier. Voici ce que j'ai essayé:

Range("A1").Select
Selection.End(xlDown).Select
Selection.End(xlDown).Select
Selection.End(xlDown).Select
Rows("264:500").Select
Selection.ClearContents

J'ai fait 3 CTRL-"flèche vers le bas" pour atteindre la zone désirée. Le hic, c'est que cette zone pourrait tout aussi bien débuter à la ligne 265 la prochaine fois. Ou à la ligne 250. Comment dire de détruire à partir de l'endroit où le 3e xlDown arrive, qui serait aléatoire ? est-ce possible ?
Pour information supplémentaire: la cellule A1 est vide. Suivi d'une bonne liste de numéros dans la colonne A. La cellule qui suit cette liste est vide dans la colonne A mais comporte des totaux dans les autres colonnes. Ensuite, c'est plein de lignes vides: Ex:
vide
client 1
client 2
client 3
vide mais totaux plus loin
vide
vide
bla-bla inutile
bla-bla inutile

pour l'instruction Rows("264:500").Select le 500 est pour se donner du jeu. Il n'y a plus rien après ce bla-bla. Existe-t-il une instruction qui dirait: détruis à partir d'où tu es rendu, jusqu'à la fin ?

merci beaucoup

2 réponses

via55 Messages postés 14512 Date d'inscription   Statut Membre Dernière intervention   2 746
 
Bonsoir

Rows(Selection.Row &":500").Select pour effacer depuis la ligne d'arrivé comprise jusqu'à 500
ou
Rows(Selection.Row +1 &":500").Select pour effacer depuis la ligne suivante jusqu'à 500

Cdlmnt
Via
0
Ju@nita Messages postés 163 Date d'inscription   Statut Membre Dernière intervention   2
 
yesssssssss, c'est exactement ce que je voulais. Ça fonctionne très bien. Faut que je garde ça en note car ça va me servir à bien des endroits.

merci beaucoup
0