Hiding Columns, based on date

[dg74]

Hi,

Can anyone help me, i'm sure what i need to do is possible, but not sure how.

Basically I have a spreasdheet which has 2 worksheets

one worksheet contains each week end date with a week no

the other sheet contains all 52 weeks of the year in columns, on this sheet is also a week end date.
I want to do a lookup to determine which week of the year it is, then automatically hide the all but 16 of the 52 columns.

Ie if the week end date is apr 8th (week 1), hide columns 17-52, therefore only show columns 1-16 (4 months at a time)

If anyone could help, I would really appreciate it.

 

[dg74]

Hi Jen,

Sorry for takign awhile to get back to you, i have inserted the code and changed the actual references to match my own.

I am getting a Run Type Error 13 - Type Mismatch on the line

MyWeek = Application.VLookup(MyDate, Sheets("Weeks").Range("A1:B52"), 2, False)

Thanks

 

[jmthompson]

How are your values in your MyDate and date lookup fields formatted?

 

[dg74]

both formatted as 'Date'

I wish I could upload the spreadsheet to show you, as it would be easier.

 

[jmthompson]

Want to e-mail a copy to me? I will PM you my address