Recognising date then exporting data to correct location

I have two workbooks, WB1 and WB2. I have attached a workbook with two sheets which represent the two seperates workbooks. I basically need a macro in WB1 that will send the contents of B3:B7 to the corresponding cells in WB2. The problem is that the date in WB1 will change each day so the cells to copy to in WB2 will change according to the date.

How would I go about writing a macro to do this?