Marco avec deux conditions sur deux colonnes différentes

Résolu/Fermé
Marie Chant Messages postés 92 Date d'inscription lundi 24 mars 2014 Statut Membre Dernière intervention 24 avril 2024 - Modifié par Marie Chant le 29/04/2015 à 20:43
 Marie chant - 29 avril 2015 à 22:38
Bonjour j'aurais une question,
Je dois changer ma macro car maintenant j'ai deux condition.

Sur une feuille nommé fature
Je veux insérer un filtre, est sélectionner dans ma colonne I (AVRIL-15) seulement et dans ma colonne AF sélectionner les (Y) seulement. Ensuite supprime toutes les lignes qui ont c'est deux critères. Je suis en excel 2010

Pour une condition dans une colonne j'ai

Dim Dernligne As Long
Dernligne = ActiveSheet.Range("A" & Rows.Count).End(xlUp).Row
For n = Dernligne To 1 Step -1
If Range("A" & n) <> "" And Range("Af" & n) = "Y" Then
Rows(n & ":" & n).Select
Selection.Delete Shift:=xlUp
End If
Next n

Maintenant j'ai deux conditions soit AVR-15 dans la colonne I si deux conditions delete la ligne

Quelqu'un pourrait m'aider s.v.p.

Merci beaucoup de votre aide c'est toujours apprécié
A voir également:

1 réponse

via55 Messages postés 14403 Date d'inscription mercredi 16 janvier 2013 Statut Membre Dernière intervention 24 avril 2024 2 703
29 avril 2015 à 22:10
Bonjour

Tu as déjà 2 conditions dans ta macro :
If Range("A" & n) <> "" And Range("Af" & n) = "Y" Then

et tu peux en rajouter une 3eme :

si avril-15 est du texte :
If Range("A" & n) <> "" And Range("Af" & n) = "Y" and Range ("I" & n) ="AVRIL-15" Then

si avril-15 est le format personnalisé d'une date d'avril
If Range("A" & n) <> "" And Range("Af" & n) = "Y" and Range ("I" & n) >=Cdate("01/04/15") and Range ("I" & n) <=Cdate("30/04/15") Then

Cdlmnt
Via
0
Merci beaucoup VIA55 Cela fonctionne parfaitement. Ca fait ma journée :)
0