VBA copy rows in table containing values in list, paste in another worksheet

Hi gurus (seriously you guys are insane),

Thanks in advance for any responses, they are always much appreciated!

Here is the low down of the workbook I am dealing with (example also attached):

• In sheet3 there is a list of dates starting at D1 going across row 1. The length of the list will vary each time the macro is run.

• In sheet1 there is a table of payments with dates in column A. The example table is small but currently it actually goes down to around row 1000.

• In sheet 2 I need to paste all payments from the table in sheet1 for the dates listed in sheet3. The payments need to be pasted transposed starting at AA1 in sheet2 (payments will list down, dates across).

Is there VBA code which can loop through the list of dates in sheet3, copy the rows in sheet1 which contain those dates and paste them transposed in to sheet2 starting at cell AA1?

Thank you and please let me know if I need to clarify anything!