enfait j'ai un tableau avec 4000 lignes et je dois supprimer une ligne sur 2 , y a t-il un moyen plus rapide que ligne par ligne?? merci...
random
tu inseres une colonne
tu mets comme formule sur ces 4000 lignes dans cette colonne
=IsOdd(LIGNE())
tu copies ta zone
tu la colles collage special valeur au meme emplacement
tu demandes le tri
tu as séparé les lignes paires des impaires
cqfd
bibia-306
tu inseres une colonne ---- > ok
tu mets comme formule sur ces 4000 lignes dans cette colonne
=IsOdd(LIGNE()) -----> ok, mais si je mets (1;4600) ca me marque une erreur non valide.
tu copies ta zone ----> je suppose que c'est les 4000 lignes ?!
collage spécial n'est pas en gras.
Merci de ton aide
bibia-306
pour les lignes j'ai mis mis (A;A) c ok par contre je comprends pas copier la zone ?!
blueoystercult
mais par contre tu peux cacher les lignes impaires
Maurice
Bonjour
par macro selectioner les ligne impair
Sub DelLigne()
Derlig = Range("A" & Rows.Count).End(xlUp).Row
For L = Derlig To 2 Step -1
If L Mod 2 <> 0 Then 'si Impair
Rows(L).Delete
End If
Next
End Sub
A+
Maurice
gbinforme
Contributeur
Bonjour Maurice,
après bientôt 10 ans, j'espère qu'il a trouvé sa solution ;-)
Il faudrait supprimer ta macro en fin d'exécution car la relance est catastrophique !
gbinforme
Contributeur
bonjour
on peut bien sûr supprimer toutes les lignes impaires
c'est un travail sans fin car si tu supprime la ligne 3
c'est la 4 qui devient 3 et ainsi de suite...
