Coba
Range("D4:D14").AdvancedFilter Action:=xlFilterCopy,
CopyToRange:=Range("E4"), Unique:=True
diganti menjadi :
Range("*D3*:D14").AdvancedFilter Action:=xlFilterCopy, CopyToRange:=Range("*
E3*"), Unique:=True

Wassalam,
Kid.

2013/1/25 <[email protected]>

> **
>
>
>
> Dear B-Exceler
>
> Mohon pencerahannya untuk cari nama yang unik di file terlampir. Saya
> sudah buat dengan rekam makro dengan Advance Filter dan pilih unique record
> dan di copy di cell tertentu, tapi tetap ada
>
> nama yang double yaitu Nama tio.
>
> Ini filenya :
>
>
>
> Salam,
> Tio
>
>  
>

Kirim email ke