[VBA-E] Problème de suppression de lignes

**coxi77** · 28/07/2006, 10h56

Salut à tous je vous explique mon problème :

J'aimerai supprimer des données jusqu'a la ligne n°10, j'avais pensé à faire simplement un :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 
Range("A1:P10").Select
Selection.Delete Shift:=xlUp

Mais dans certains fichiers la première ligne du tableau commence, par exemple, au niveau de la cellule A4 et non de A1 comme c'est généralement le cas . Quand j'execute la macro il me supprime donc des données que j'aimerai garder...

Je cherche donc a faire une macro me permettant de supprimer les données jusqu'a la ligne 10 et ce peut importe la cellule de départ.

Des idées ?

Merci d'avance

**illight** · 28/07/2006, 11h14

Heuu peu importe vraiment ? ou tu as quand un indice qui te permettre de commencer la suppression a, par exemple la ligne 4 ?

**ouskel'n'or** · 28/07/2006, 11h20

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Dim NoColonne, NoPremièreLigne, DernièreLigne
NoPremièreLigne = 1
NoColonne = 2
DernièreLigne = 10
Range(Cells(NoPremièreLigne, NoColonne), Cells(DernièreLigne, NoColonne)).Clear

**illight** · 28/07/2006, 11h32

Ousk, ta formule supprime les cellules ou juste leur contenu ?

Parce que dans l'aide, ils disent que ça supprime juste ce qu'elles contienne, or a priori il veux les supprimer non ?