I want to run my procedure of moving row data to another worksheet. I have that but I want it to run automatically when the spreadsheet opens. If Column B date is 7 days ago from today's i want it to run my macro (TransferPrints) . For example if today is 06/05/2013 and column B has a date of 05/20/2013 (Subtract only weekdays), it would run, if it is 6/01/2013 it would not run my macro for that particular row.
I tried adding the following procedure to the workbook page but I'm having all my data in Column B removed instead of filtering and selecting only days that are greater than 7 days from today
Private Sub Workbook_Open()
On Error Resume Next
If (Application.WorksheetFunction.Weekday(Format(Now(), "m/d/yyyy") > 7)) Then
If (Format(Now(), "m,d,yyyy") = Sheets("Print").Range("B:B").Value) Then
'If (WorksheetFunction.WorkDay(Sheets("Print").Range("B:B"), -7)) Then