Hi p45cal,
thanks for you reply. I had a look into your macro over easter holidays and I like especially option 1! Thanks a lot. I was amazed to see that this function works even with a one liner.
Could you just explain why the macro doesnt produce an output of the extract area is in some cells?
For example I put the extract in B4 and C4:
Sub Macro5()
Sheets("Table1").Range("A1").CurrentRegion.AdvancedFilter Action:=xlFilterCopy, CriteriaRange:=Sheets("Table2").Range("G16:G17"), CopyToRange:=Range("B4:C4"), Unique:=False
End Sub
and I get an error message.
Output area in B23 and C23 works flawless.
Sub Macro5()
Sheets("Table1").Range("A1").CurrentRegion.AdvancedFilter Action:=xlFilterCopy, CriteriaRange:=Sheets("Table2").Range("G16:G17"), CopyToRange:=Range("B23:C23"), Unique:=False
End Sub
Why is that?
Thanks for your help! Very much appreciated!