Need to delete column based on date value in cell

[dusty90]

I am very new to VBA, in process of learning. I'm looking to delete column "C" based on the actual calander date. Ex., If I open the worksheet on 9/22, I would like for the column containing the date 9/21 to be deleted. Shift all columns to the left, and then in column "I", fill in the next date. Also, I may have row 1 set up incorrectly. I would like for column "C" to be the current date, followed by at least 6 consecutive days. I have attached my workbook. Thanks in advance.

[alansidman]

Put this in the workbook_open event

Please Login or Register  to view this content.

[jindon]

dusty90,

Here's how I read your problem.
To ThisWorkbook code module.

Please Login or Register  to view this content.