Comment supprimer des lignes sous certaines conditions

C

claude65

XLDnaute Nouveau

• 23 Mai 2008

• #2

Re : Comment supprimer des lignes sous certaines conditions

Bonsoir Frichti
Le plus simple : Ajoute une colonne
colle la formule ci dessous dans la cellule J2 Recopie vers le bas
=SI(OU(D2="";F2="");"erreur";"Bon")
Il ne reste plus qu'à supprimer les lignes contenant la mention "erreur"
Si tu cherche plutôt une macro qui fasse tout le boulot reviens sur le forum des spécialistes devrait te "torcher" ça en moins de temp que je n'ai mis à te répondre
Claude65

 

Vote positif 0 Vote négatif

F

frichti

XLDnaute Nouveau

• 23 Mai 2008

• #3

Re : Comment supprimer des lignes sous certaines conditions

merci Claude ... ça j'ai su faire.
C'est justement d'une macro dont j'aurai besoin pour automatiser la suppression des lignes inutiles

 

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 23 Mai 2008

• #4

Re : Comment supprimer des lignes sous certaines conditions

Bonsoir,
Pourquoi une macro ? Edition/Atteindre (Excel 2003) permet de sélectionner les cellules vides de la sélection. Faites ensuite Edition/Supprimer...
A+

 

Vote positif 0 Vote négatif

F

frichti

XLDnaute Nouveau

• 23 Mai 2008

• #5

Re : Comment supprimer des lignes sous certaines conditions

Merci job75 mais ta solution de résoud pas ma problématique. Cordialement

 

Vote positif 0 Vote négatif

C

claude65

XLDnaute Nouveau

• 23 Mai 2008

• #6

Re : Comment supprimer des lignes sous certaines conditions

Re Bonsoir frichti,

Regarde le fichier joint et dis moi si celà correspond à ton souhait

Claude65

 

Pièces jointes

• Essai1_PV_V1.zip

  17.9 KB · Affichages: 814

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 24 Mai 2008

• #7

Re : Comment supprimer des lignes sous certaines conditions

Merci de nous expliquer, frichti, quelle est votre problèmatique, à part supprimer les lignes inutiles.
A+

 

Vote positif 0 Vote négatif

F

frichti

XLDnaute Nouveau

• 24 Mai 2008

• #8

Re : Comment supprimer des lignes sous certaines conditions

CLaude, c'est tout à fait ce que je souhaitai obtenir comme résultat.Merci.
Remerciement également à job75 pour s'être préoccupé de mon problème

 

Vote positif 0 Vote négatif

K

kjin

XLDnaute Barbatruc

• 24 Mai 2008

• #9

Re : Comment supprimer des lignes sous certaines conditions

Bonsoir,
A adapter (juste pour éviter les sélections)

Sub efface()
With Sheets("PrépareTraitement")
DerLign = .Range("A65000").End(xlUp).Row
For i = DerLign To 1 Step -1
If Cells(i, 4) = "" Or Cells(i, 6) = "" Then Rows(i).Delete
Next
End With
End Sub

A+
kjin

 

Vote positif 0 Vote négatif

F

frichti

XLDnaute Nouveau

• 24 Mai 2008

• #10

Re : Comment supprimer des lignes sous certaines conditions

Merci kjin, là je suis comblé... ça fonctionne parfaitement dans mon application.
Salutations

 

Vote positif 0 Vote négatif

Cousinhub

XLDnaute Barbatruc

• 24 Mai 2008

• #11

Re : Comment supprimer des lignes sous certaines conditions

Bonsoir,
une autre approche :

Code:

Sub Macro2()
For i = 4 To 6 Step 2
    Columns(i).SpecialCells(xlCellTypeBlanks).EntireRow.Delete
Next i
End Sub

Juste pour le fun...

 

Vote positif 0 Vote négatif

F

frichti

XLDnaute Nouveau

• 25 Mai 2008

• #12

Re : Comment supprimer des lignes sous certaines conditions

bhbh, je te remercie pour cette suggestion. Cordialement.

 

Vote positif 0 Vote négatif