Solved: Relative range for advanced filter

[yasarayhanka]

I am trying to use advanced filter function for a relative range that will change everyday.
does anyone know how to do it?
Thanks,

Yasar

[lucas]

how does it change every day? Can you use a named range, it will not chnage if rows are deleted etc.

[yasarayhanka]

how does it change every day? Can you use a named range, it will not chnage if rows are deleted etc.

there will be new rows added to it,
Here is the code I am using

Range("G1:G12491").AdvancedFilter Action:=xlFilterInPlace, CriteriaRange:= _
Workbooks("test.xls").Sheets("Sheet2").Range("A1:A5"), _
Unique:=False
and the range tomorrow might be ("G1:G13000")
With other functions I can write "selection" at the beginning of the code and it will work like sort, function, but with this I could not manage it so far.

[lucas]

Have you tried:
[VBA]
Range("G:G").AdvancedFilter Action:=xlFilterInPlace, CriteriaRange:= _
Workbooks("test.xls").Sheets("Sheet2").Range("A1:A5"), _
Unique:=False

[/VBA]

[lucas]

this seems to work with a selection but I don't have your data so untested also:
[VBA]With Selection
.AdvancedFilter Action:=xlFilterInPlace, CriteriaRange:= _
Workbooks("test.xls").Sheets("Sheet2").Range("A1:A5"), _
Unique:=False
End With[/VBA]

[yasarayhanka]

this seems to work with a selection but I don't have your data so untested also:
[vba]With Selection
.AdvancedFilter Action:=xlFilterInPlace, CriteriaRange:= _
Workbooks("test.xls").Sheets("Sheet2").Range("A1:A5"), _
Unique:=False
End With[/vba]

thank you very much, that saved the day