Looping Until Matches Date

Hi,

I am new to VBA programming and have tried to create a loop that copy and pastes values from right to left. The StartDate is in the copy and paste section I am copying and pastesing repeatedly. The CurrentDate is at the top of my spreadsheet. There are different dates that are at the top of the sheet every 10 or 11 columns on the top row

So what I am having a problem with is I want the Activecell.offset to work on what the loop pastes to then check the CurrentDate on the top row above. What it is currently doing is just referring to the CurrentDate at the top at the start of the loop but not moving along with the pasting of the data and then lookup up to top row above where it is when it pastes the lasted loop.

So lets say the "StartDate" is 10/10/2012 at the top "CurrentDate" it has the dates from around 07/07/2018 and is at the top row all the way back to 02/02/2002 so along the way the "StartDate" will match the "CurrentDate" and it should stop looping.

Hope I am making sense. Below is my attempt which is not working.

Please Login or Register  to view this content.

Attach a sample workbook (not a picture or pasted copy). Make sure there is just enough data to demonstrate your need. Include a BEFORE sheet and an AFTER sheet in the workbook if needed to show the process you're trying to complete or automate. Make sure your desired results are shown, mock them up manually if necessary.

Remember to desensitize the data.

Click on GO ADVANCED and then scroll down to Manage Attachments to open the upload window.