excel supression de lignes avec condition

Recherche :

Mot : Pseudo : Filtrer
Bas de page
Auteur	Sujet : excel supression de lignes avec condition

kirua78210

Ren, Zetsu, Nen . . .

Bonjour,
Je vous explique mon probleme .
Je n'y connais pas trop en programmation ni en macros. J'ai un tableau excel de 2000 lignes sur 20 colonnes. Je dois suprimmer les lignes dans lesquels les cellules de la colonne A est le texte "N" .

Merci de m'aider

Message édité par kirua78210 le 28-08-2008 à 12:55:59

Publicité

cyber-solaris

Je t'ai codé une macro pour faire ce que tu comptes faire :

Citation :

Sub macro1()
Dim l As Long
For l = Cells(2000, 1).End(xlUp).Row To 1 Step -1
If Cells(l, 1).Text = "N" Then Cells(l, 1).EntireRow.Delete
Next l
End Sub

Message édité par cyber-solaris le 28-08-2008 à 15:42:42

---------------
Mon Feed-back

kirua78210

Ren, Zetsu, Nen . . .

Merci beaucoup !
Je vais tester tout de suite !

kirua78210

Ren, Zetsu, Nen . . .

Il marche nikel !!
Merci beaucoup !!

kirua78210

Ren, Zetsu, Nen . . .

Un autre probleme !
Un tableau un peu plus grand et il faut supprimer toutes les lignes dans lesquels la colonne n'a pas le texte " ajouter ".
Merci !

cyber-solaris

Toujours sur la colonne A ? Alors ça donne :

Citation :

Sub macro2()
Dim l As Long
For l = Cells(65536, 1).End(xlUp).Row To 1 Step -1
If Cells(l, 1).Text <> "ajouter" Then Cells(l, 1).EntireRow.Delete
Next l
End Sub

---------------
Mon Feed-back

kirua78210

Ren, Zetsu, Nen . . .

non sur la colonne D ... Merci

cyber-solaris

Ben t'as juste à remplacer 1 par 4 (A=1 / 4=D)

Citation :

Sub macro2()
Dim l As Long
For l = Cells(65536, 4).End(xlUp).Row To 1 Step -1
If Cells(l, 4).Text <> "ajouter" Then Cells(l, 4).EntireRow.Delete
Next l
End Sub

---------------
Mon Feed-back

kirua78210

Ren, Zetsu, Nen . . .

Thanks a lot cyber-solaris

FORUM HardWare.fr

Windows & Software

Logiciels

excel supression de lignes avec condition

Sujets relatifs
excel : formule avec conditions	[Excel] Problème pour des courbes en fonction d'un pourcentage
Fichier excel Fichie Verouillé	excel+calendrier perpétuel+compteur
Pb de mise à jour entre 2 documents excel liés	horaire travail compliqué sur excel
Problème impression des textes en couleur sous Excel	Ouverture fichiers excel et word trés lente
Résolu! Excel-Macro de création de liens hypertexte en automatique	Inserer une page web dans excel word ou ppt
Plus de sujets relatifs à : excel supression de lignes avec condition

Page générée en 0.061 secondes