VBA macro supression dernières lignes

Résolu
fapfapfap -  
pijaku Messages postés 12263 Date d'inscription   Statut Modérateur Dernière intervention   -
Bonjour,


j'aimerais savoir comment écrire une macro excel pour:

-séléctionner une plage de la première ligne vide à la fin de mes données jusqu'à la 65536ème ligne (soit jusqu'à la limite de lignes excel)

-supprimer ces lignes



Merci d'avance!
A voir également:

2 réponses

Réponse 1 / 2
chossette9 Messages postés 4239 Date d'inscription   Statut Contributeur Dernière intervention   1 311
 
Bonjour,

pour rappel : 65536 est le nombre maximal de lignes sous Excel 2003 et inférieur. En 2007 et 2010, la limite est passée à 1048576.

De plus, si ces lignes sont vides, pourquoi veux-tu les supprimer ? Ne parlerais-tu pas plutôt de les masquer ?

Cordialement.
0
fapfapfap
 
oups, merci pour l'update.

en fait ces lignes sont vides mais tout de même formatées (bordures par exemple)

J'aimerais donc simplement m'en débarasser!

Merci!
0
Réponse 2 / 2
pijaku Messages postés 12263 Date d'inscription   Statut Modérateur Dernière intervention   2 762
 
Bonjour,
Pour être sur de la denière ligne selon version excel (> ou < 2007) :

!!!! Attention ce code contient un Delete
!!!! A tester sur une copie du classeur original!!!!

A adapter :
- le "A" dans DrLig = .Range("A" & Rows.Count).End(xlUp).Row + 1
pour déterminer la "colonne la + longue"
- le nom de la feuille dans : With Sheets("Feuil1") 

Sub SupprLignvides()   
Dim DrLig As Long   

With Sheets("Feuil1")   
    '!!! Pour déterminer la première ligne vide on se base sur la colonne A   
    DrLig = .Range("A" & Rows.Count).End(xlUp).Row + 1 'adapter "A"   
    .Rows(DrLig & ":" & Rows.Count).Delete   
End With   
End Sub

Cordialement,
Franck P
0
fapfapfap
 
magistral, merci!
0
pijaku Messages postés 12263 Date d'inscription   Statut Modérateur Dernière intervention   2 762
 
De rien.
A+
0