Macro geavanceerde filter werkt niet

[SirBotex]

hallo,

een recorded macro die tijdens het "recorden" alles doet wat hij moet doen, werkt niet eens hij als macro uitgevoerd wordt...
doel is om op tabblad "maand" van een bepaalde periode de gegevens uit het tabblad "detail" over te nemen, en daar dan een berekening op uit te voeren


code macro:

Sub Uren_Filteren()
'
' Uren_Filteren Macro
'

'
    Sheets("Detail").Range("A1").CurrentRegion.AdvancedFilter _
        Action:=xlFilterCopy, _
        CriteriaRange:=Sheets("Maand").Range("i2:j3"), _
        CopyToRange:=Sheets("Maand").Range("A5:E5"), _
        Unique:=False

End Sub

voorbeeld document in bijlage.

Iemand een idee voor een oplossing?

Thx

Stijn

 

[Haije]

Stijn,

welkom op Helpmij.nl!

Zie bijlage voor de gewijzigde macro en de correcte opgave van de criteria

 

[SirBotex]

Haije,

dank je voor het snelle antwoord.
Bij mij doet de macro echter nog steeds niet wat hij hoort te doen (al doet hij nu tenminste al iets )

als ik probeer om bijvoorbeeld alle ingaves van 1/6/13 tem 30/6/13 te laten kopieren (dus ik pas de gegevens in I3 en I4 aan naar >=1/6/2013 en <=30/6/2013)
krijg ik alle ingaves die op het blad detail staan (in dit geval van begin april tem 3 juli...)

groeten
Stijn

 

[Haije]

Stijn,

dat zal liggen aan hoe je de datums op geeft.

 

[SirBotex]

hoe zouden ze dan moeten opgegeven worden?

 

[Haije]

Stijn,

enig zoekwerk op Helpmij.nl heeft de volgende bijlage opgeleverd......

 

[SirBotex]

Haije,

ik krijg het in mijn workbook niet opgelost (geen enkel idee waarom niet), maar als ik jouw bestandje gebruik werkt het wel, dus Problem Solved!
Waarvoor dank!