VBA Button voor filteren

[Stephandejong]

Hallo,

Ik ben al een tijdje opzoek hoe ik een sheet kan filteren door middel van VBA Button.
Met deze button zou ik graag willen dat hij cel A3 t/m J99999 filtert op de datum van morgen.
Hij moet alle gegevens meenemen die in de rij morgen staan.

Voorbeeld:

zaterdag 1 juni 2013 Voor 12:00 210000123456 004 100 Jantje Pietje Rond 11:00 gebracht 56077 402748

Deze gegevens moet hij allemaal meenemen als je op de VBA button drukt en hij gaat filteren op de datum van morgen.


In de bijlage heb ik het document gedaan zodat iemand er even naar kan kijken.
Ik hoop dat iemand mij kan helpen.


Stephan
Bekijk bijlage Afleverlijst clusters blanco test.xlsx

 

[spaarie]

Kan je hier wat mee?

Sub filter_morgen()
    Sheets(1).Range("A2:L2").AutoFilter 1, "=" & Format(Date + 1, "dddd dd mmmm yyyy")
End Sub

Sub filter_uit()
    Sheets.Range("A2:L2").AutoFilter
End Sub

 

[Stephandejong]

Gelukt