Macro suppression ligne en fonction de la Date

[Elodie195]

Bonjour,

je cherche à faire une macro qui me supprime tout 2011 et me garde 2012 dans mon fichier Excel.

Ma date est en format étrange : jj/mm/aaaa hh:mm

j'ai tenté ceci :

If Range("e" & i).Value < 31/12/11 Then Rows(i).Delete
Next i
End Sub

est-ce un bon début ?

merci d'avance de vos éclairements.

Elodie

 

[Legolas]

Re : Macro suppression ligne en fonction de la Date

Bonjour à tous !

Essaye avec la fonction YEAR

If Year(Cells(i, 5)) < 2012 Then Rows(i).Delete
Next i

A plus !

 

[Pierrot93]

Re : Macro suppression ligne en fonction de la Date

Bonjour,

est-ce un bon début ?

d'après ce que tu montres, c'est plutôt la fin, non.... la date devrait être entre 2 #... A voir comment tu fais ta boucle "for"... comme ca difficile à dire avec un bout de code jeté sur un post...

bonne journée
@+

 

[VDAVID]

Re : Macro suppression ligne en fonction de la Date

Bonjour Elodie195,

Une proposition:

Le step -1 est à privilégier lorsque l'on supprime des lignes:

Dim i&
For i = Range("E65536").End(xlUp).Row To 1 Step -1

    If Year(Range("E" & i).Value) = "2011" Then
    Rows(i).Delete
    End If
    
Next i

Bonne journée !

EDIT: Bonjour Legolas, Pierrot93

 

[Elodie195]

Re : Macro suppression ligne en fonction de la Date

Bonjour,

merci beaucoup de vos réponses !

j'ai utilisé la réponse de DAVID qui fonctionne très bien

merci encore.