Copy column data on one sheet to row or column date on another sheet based on user in

I would like to copy data on a Master sheet to a Weekly sheet to retain the values for each week.
I have this code, but it doesn't find the date for some reason:

Please Login or Register  to view this content.

1) Read Date input (End of the week date) by User in B4 on the Master Monthly-Weekly Totals sheet
2) Copy Data in Column D
3) Go to Worksheet "Weekly" and find the same date input by the user, and paste the data to that column

I think the problem here is the Find(What:=WEDate), I've tried Find(WEDate), even tried Find(CDate(WEDate)), Excel always finds Nothing, so my paste code never executes.

Sorry about that, here you go and thanks in advance:

Set rng = .Range("A1:A53").Find(What:=WEDate, LookIn:=xlValues)

This line always returns Nothing, any idea why. I can get everything to work except code to find the matching date (Column Headers on Weekly Sheet) and paste the data to that column. I can hit enter in a cell and it pastes exactly what I want. But I don't want to have to do that. I want the code to copy from master sheet based on the date input by a user in cell B4; copy cells D7:D128; go to weekly sheet, find the matching date and paste to that column when the date is found.