Instead of Filter use Advance filter. Select range and tick Unique
items.

Select visible and copy to any location then click cell you want to
copy to.

Attached some links on Advance Filters

http://www.dailydoseofexcel.com/arch...vanced-filter/

http://www.contextures.com/xladvfilter01.html

VBA Noob


--
VBA Noob
------------------------------------------------------------------------
VBA Noob's Profile: http://www.excelforum.com/member.php...o&userid=33833
View this thread: http://www.excelforum.com/showthread...hreadid=564029