Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Supprimer des lignes selon le mot et les conditions ..

  • Initiateur de la discussion Initiateur de la discussion Guido
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

Guido

XLDnaute Accro
Bonjour le Forum

J'aimerais finalisé pour avoir un résultats final...

1° Dans la Page " test ":

De cette page j'aimerais garder que les lignes qui ont le

mot "Gardé" et supprimé les autre lignes .

2°Dans la page " PAGE ":

De cette page j'aimerais garder que les lignes qui ont le

meme chiffre dans la colonne x et z ,et

supprimé les lignes qui non pas le même contenu …???

Merci d'avancs

Guido
 

Pièces jointes

Bonjour
tu aurais du garder le fichier précédent avec les macros
maintenant. si la condition pour supprimer une ligne c'est lorsque les colonnes V W X Y et Z sont vides, il suffit de changer la condition dans le code (du coup. je ne vois pas bien à quoi servent tes colonnes AA AB, AC et AD.

VB:
Sub TestGarder()
Application.ScreenUpdating = False
With Sheets("Test")
   For i = .Range("AA" & .Rows.Count).End(xlUp).Row To 3 Step -1
       If .Range("V" & i) = "" And .Range("W" & i) = "" And .Range("X" & i) = "" And .Range("Y" & i) = "" And .Range("Z" & i) = "" Then
            .Range("AA" & i).EntireRow.Delete
       End If
   Next i
End With

'With Sheets("Page")
'   For i = .Range("AA" & .Rows.Count).End(xlUp).Row To 3 Step -1
'       If .Range("X" & i) <> .Range("Z" & i) Then
'            .Range("AA" & i).EntireRow.Delete
'       End If
'   Next i
'End With
Application.ScreenUpdating = True
End Sub
 
Re


je ne vois pas bien à quoi servent tes colonnes AA AB, AC et AD. ???

Re

c'est juste pour ma demande..Mais ces colonnes seront vide dans le fichier originale..


Salut vgendron

Je vais adapté et je te donnerais le retour...

Merci

Guido
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…