Comment détruire des lignes qui suivent des lignes vides

Résolu/Fermé
Ju@nita Messages postés 135 Date d'inscription mardi 11 juin 2013 Statut Membre Dernière intervention 19 mars 2018 - 3 mai 2016 à 19:46
Ju@nita Messages postés 135 Date d'inscription mardi 11 juin 2013 Statut Membre Dernière intervention 19 mars 2018 - 3 mai 2016 à 21:09
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

A voir également:

2 réponses

via55 Messages postés 14402 Date d'inscription mercredi 16 janvier 2013 Statut Membre Dernière intervention 18 avril 2024 2 702
3 mai 2016 à 21:03
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 135 Date d'inscription mardi 11 juin 2013 Statut Membre Dernière intervention 19 mars 2018
3 mai 2016 à 21:09
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