Distributing Data from an expanding worksheet list and appending to various tabs in the sa

I am trying to pull data from an expanding worksheet list that will export that data to different tabs based on the criteria.
The YearToDate tab pulls information daily from various individual log and expense sheets so is ever growing. (Cards are assigned on a daily basis and may be used by more than one person.)
At the end of each month, I would like to run a macro that pulls all of the information for that month and distributes it to the various worksheet tabs by card number (some of which are actually initials). This data needs to append to the existing data on each worksheet, if any so that each tab (card) will then have a running year-to-date list.
Thanks for your help!
~Cdot

john,
Thank you for the code you provided. It works the first time I run it but when completed, the columns stay filtered and when I add consecutive data and try to rerun the macro to move the next set of data, it doesn't seem to work or copy anything to the inidiviual worksheets.

I am having trouble understanding the code so do not know how to edit it to select the next month.

John,
Thank you! thank you for the code and the annotations. It works amazingly well. I appreciate your time and help.
~Cdot