Supprimer ligne selon format

Résolu

a51432 Messages postés 39 Statut Membre -
Zoul67 Messages postés 2001 Statut Membre - 20 oct. 2015 à 17:11

Bonjour,

Dans un fichier excel, je cherche à supprimer chaque ligne pour laquelle la colonne E contient 3 caractères qui soient 2 chiffres puis une lettre qui soit A, B, E, F, Q, R ou Z (ex : 14B ou 61Q).

Une idée ?

Merci d'avance.

Afficher la suite

1 réponse

Zoul67 Messages postés 2001 Statut Membre 149

Bonjour,

For i=DerLigne To 2 Step -1
chaine = Cells(i,5).Value
   If Len(chaine) = 3 Then
      If IsNumeric(Left(chaine,2)) Then
         If Instr("ABEFQRZ",Right(chaine))>0 Then Rows(i).Delete
         EndIf
      EndIf
   EndIf
Next i

A+

a51432 Messages postés 39 Statut Membre 1

Merci pour ta réponse. Je n'ai pas testé car j'ai trouvé une autre solution ce matin.

Code :

derLig = .Range("B" & .Rows.Count).End(xlUp).Row
            For i = derLig To 5 Step -1
                If .Cells(i, 5) Like "##[A-B]" Or .Cells(i, 5) Like "##[E-F]" Or .Cells(i, 5) Like "##[K]" Or .Cells(i, 5) Like "##[M-N]" Then
                    .Cells(i, 5).EntireRow.Delete
                End If
            Next i

Zoul67 Messages postés 2001 Statut Membre 149

C'est une bonne solution. La prochaine fois, essaie de répondre en premier à ta question pour éviter que des gens cherchent pour toi alors que tu as déjà résolu ton problème.
0

Supprimer ligne selon format

1 réponse

Discussions similaires

Newsletters