Macro To Produce List From Specific Range

I have a workbook with 2 worksheets, Sheet1 & Sheet2.
Sheet1 has a list of products on it, with a code, pack size and cost.

Sheet2 has got 8 columns in it.

The first column will be A , B , C

The second will be D, E, F

Third will be G, H, I

Going right through to column 8 which will be V, W X

In the second column in each on I will be have a (sell by date) So B, E, H, through to W will have sell by dates in them.

What I am looking for is a macro that will give me a list of short sell by dates when I click the button. So if today’s date is 02/12/09 when the button is clicked it will give me a list of all the product that have lets say a month sell by date left, I would like to be able to change the month to anything I want, just in case I want to do a longer check on the sell by date.

When it finds a short date I would like it to check against the code, so in the first column the code will be in A, it will match that code up against the code in Sheet1 and give me a list of the Code, and the Product from sheet1 and the sell by date that’s in Sheet2. The problem I have is when data is put into the second column on sheet2 which is D.E.F, I would want it just to check that column and not the A,B,C from column 1.