Version 2003 to 2007

[PcMax]

Hi,

This is a macro in Excel 2003 version, as you can use in Excel 2007 ...
On the first page there are items to be searched, according to the criteria and where the export
now reports: Debug


Sub Macro2()
Dim RigaDati As Long
'---I am looking for the last row to search...
RigaDati = Sheets("Dati").Cells(Rows.Count, 2).End(xlUp).Row + 1

'---This code performs an advanced filter on the data sheet: "Dati"
Sheets("Dati").Range("A2:J" & RigaDati).AdvancedFilter Action:=xlFilterCopy, CriteriaRange:=Sheets("ricerche").Range( _
"A7:J19"), CopyToRange:=Sheets("ricerche").Range("O2:X2"), Unique:=False
End Sub

Unfortunately I have available to Excel 2007 - 2010 for testing

[Admin]

Hi,

I'm not clear. In which line you get error ?

Can you attach a workbook ?

[PcMax]

Hi

Following attachment, no sensitive data:
Download Filter.zip from Sendspace.com - send big files the easy way (http://www.sendspace.com/file/c3bhfi)

[Admin]

Hi,

Can you please upload the file here ? Users won't like to download the files from external source.

[PcMax]

Hi,
Gold I found how to attach the file regularly feature in Excel version 2003.
What I do not know how to do it for later
154

[Admin]

Hi,

What's the error. It works fine in Excel 2003 and 2007.