Move date shown in cell to new cell directly left once date has passed

[jamieswift1977]

Hi,

I'm trying to get a date value from a cell to move directly to the left one cell once the date has passed todays date. Is this possble?

Many thanks in advance!

Jamie

[ChemistB]

This will require VBA and maybe an event driven event upon opening the spreadsheet. Is there a specific cell where the date will be originally? Do you want it moved to the left or do you want to insert a new column to the left and have it placed there?

[jamieswift1977]

Ok the dates are in column I:12 down to the end or last row (until new dates are entered - where the formula would need to continue), and I just want it moved to the absolute left, do for example if the date was on I:505, I would want it moved to H:505, and blank out the original cell (I:505). I am happy to use VBA on startup and during if needed as it is a heavily formula and macro based spreadsheet.

Many thanks in advance once again!!

[ChemistB]

What will happen to what was in (if anything) H505?

[jamieswift1977]

It would just be overwritten.

[ChemistB]

Okay, the following code is stored in the "This Workbook" module

Please Login or Register  to view this content.

See attachment. Is this what you are looking for?

[jamieswift1977]

Absolutely marvellous - exactly what I wanted! Works a treat (as far as I can tell!). Thank you SO much for your help, you're a godsend. Have a great rest of week!

Kind regards
Jamie