VBA Excel Supprimer des lignesl

VBA Excel Supprimer des lignesl - VB/VBA/VBS - Programmation

Marsh Posté le 23-06-2008 à 09:23:42    

VBA EXCEL - Créer macro supprimer des lignes sous condition
 
Bonjour,  
 
J'ai une liste de données dans la première feuille excel et j'aimerais créer une macro qui a chaque fois qu'il voit apparaître un o dans la colonne E, il supprimer la ligne. Je suis débutant et je n'y arrive pas.  
La colonne E comporte + de 15000 lignes de données, il faut que le traitement soit le plus court possible
 
Merci de votre aide!

Reply

Marsh Posté le 23-06-2008 à 09:23:42   

Reply

Marsh Posté le 23-06-2008 à 15:40:47    

Bonjour,
à essayer, en adapatant le "a".......
 
 
Sub ann()
Dim FIFI As Range
If ActiveSheet.AutoFilterMode Then ActiveSheet.AutoFilterMode = False
Range("E1" ).AutoFilter Field:=1, Criteria1:="a"
Set FIFI = ActiveSheet.AutoFilter.Range
FIFI.EntireRow.Delete
ActiveSheet.AutoFilterMode = False
End Sub
Cordialement

Reply

Marsh Posté le 24-06-2008 à 15:25:38    

Impeccable, merci

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed