Macro to Paste Into Next Available Cell in Row 1

[rmmohan]

I have a working macro that pastes data continously in columns. What I need is for it to paste the date on top of that column.
The date is in the same cell everytime. It just needs to copy from that specific cell and paste into the next available cell in Row 1 because that would align with the most recent column.

I have attached a file to better explain. The date is being pulled from the "Date" tab in cell A1.
In the example tab is where the date should be pasted. In this example "C1", but as I said it needs to search for the next available cell in that row.

The tab "End Result" shows what it should look like.

I really appreciate the help!
Thank you in advance =)

[JOHN H. DAVIS]

Maybe:

Please Login or Register  to view this content.

[rmmohan]

thank you for your help! this worked great.

[JOHN H. DAVIS]

You're welcome. Glad to help out, and thanks for the feedback.