XL 2010 [Résolu] filtrer un tableau par semaine suivant deux dates

Lone-wolf

XLDnaute Barbatruc
Bonsoir à tous

J'ai un serieux problème pour filtrer un tableau par semaine suivant critères de deux dates.

VB:
Date1 = Range("m3")
Date2 = Range("o3")

    derlig = Range("a" & Rows.Count).End(xlUp).Row

   If Range("o3") <> "" Then
     Set plage = Range("a6:f" & derlig)
     For Each cel In plage
     If cel.Offset(, 1) = Date1 And cel.Offset(, 1) = Date2 Then
    plage.AutoFilter Field:=2, Criteria1:=">=" & Date1, Operator:=xlAnd, Criteria2:="<=" & Date2
    End If
    Next cel
    End If


If Range("o3") <> "" Then
  Set plage = Range("a6:f" & derlig)
  plage.AutoFilter Field:=2, Criteria1:=">=" & Format(Range("m3"), "ddd d mmmm"), Operator:=xlAnd, _
  Criteria2:="<=" & Format(Range("o3"), "ddd d mmmm")
  End If
Les codes suivants sont obsolètes. Un coup de main serait la bienvenue.
 

Fichiers joints

Dernière édition:

Lone-wolf

XLDnaute Barbatruc
Bonsoir le Forum

Ouuuuff!! C'était temps. J'ai trouvé la soultion grace à une macro de Jacques Boisgontier.

Criteria1:=">=" & Range("m3").Value2, Operator:=xlAnd, Criteria2:="<=" & Range("o3").value2
 

Créez un compte ou connectez vous pour répondre

Vous devez être membre afin de pouvoir répondre ici

Créer un compte

Créez un compte Excel Downloads. C'est simple!

Connexion

Vous avez déjà un compte? Connectez vous ici.

Haut Bas