Macro - Filter data and copy to a new tab

[Fisher1975]

Hi

I have been trying to do the following, but without any success and would very much like some help

I want to do the following:

Sheet 1 - Select parameters for 3 columns in a sheet e.g. Product (Cell C3), Location (Cell C4), Date (Cell C5)

I then want to use the filter in sheet 2 (Row 3), filter on the said parameters (Product (Column B), Location (Column F), Date (Column J)) and copy the data to a new tab

Sheet 2 doesn't just have the said parameters above, it has many more

Hopefully someone can help

 

[Fluff]

If you are happy to change the layout of sheet 1 so that you have the headers in row1 & the criteria below like

Book1
	A	B	C
1	Product	Location	Date
2	Orange	Dorset	01/01/1980
Sheet1

The headers much exactly match the headers in row 3 of Sheet2
You could use

Sub Fisher1975()
   Sheets("Sheet2").Range("A3").CurrentRegion.AdvancedFilter xlFilterCopy, Sheets("Sheet1").Range("A1:C2"), Sheets("sheet3").Range("A1"), False
End Sub