Walaupun mintanya pake VBA, file terlampir iseng tanpa VBA. Pake kolom
bantu pula. Udah gak sesuai syarat, pake embel-embel kolom bantu juga.
tur yo wis ben....

Formula kolom bantu :
=K3&"|"&L3&"|"&M3

Formula id_duplikat :
=IF(COUNTIF($O$3:$O$24,O3)>1,IF(COUNTIF(O$3:O3,O3)=1,MAX(P$2:P2)+1,VLOOKUP(O3,O$2:P2,2,FALSE)),0)

Salam.
Kid.

On Fri, Mar 9, 2012 at 10:27, Fano The Miner <[email protected]>wrote:

> **
>
>
>  Dear All BeExceller,****
>
> ** **
>
> Mohon Bantuan Para Suhu..****
>
> Mohon pencerahan *Coding Macro* untuk problem saya :).****
>
> Saya  punya data seperti pada kolom (A:D).****
>
> Saya ingin mendapatkan keterangan tentang nilai duplikasi pada 1 row 3
> kolom (B,C & D). Jika nilai di kolom B,C & D di salah satu row, ****
>
> sama dengan row lainnya, maka pada kolom I akan di isi keterangan tentang
> duplikasi data berdasarkan urutan duplikasi****
>
> ** **
>
> ** **
>
> 3000****
>
> 5000****
>
> 12****
>
> Duplicate_1****
>
> 3050****
>
> 5010****
>
> 70****
>
> Duplicate_2****
>
> 3065****
>
> 5025****
>
> 85****
>
>  ****
>
> 3089****
>
> 5049****
>
> 109****
>
>  ****
>
> 3124****
>
> 5084****
>
> 144****
>
>  ****
>
> 3172****
>
> 5132****
>
> 192****
>
>  ****
>
> 3000****
>
> 5000****
>
> 12****
>
> Duplicate_1****
>
> 3080****
>
> 5080****
>
> 92****
>
>  ****
>
> 3500****
>
> 5400****
>
> 69****
>
> Duplicate_3****
>
> 3620****
>
> 5520****
>
> 189****
>
>  ****
>
> 3763****
>
> 5663****
>
> 332****
>
>  ****
>
> 3050****
>
> 5010****
>
> 70****
>
> Duplicate_2****
>
> 3245****
>
> 5205****
>
> 265****
>
>  ****
>
> 3469****
>
> 5429****
>
> 489****
>
>  ****
>
> 3000****
>
> 5000****
>
> 12****
>
> Duplicate_1****
>
> 3288****
>
> 5288****
>
> 300****
>
>  ****
>
> 3611****
>
> 5611****
>
> 623****
>
>  ****
>
> 3500****
>
> 5400****
>
> 69****
>
> Duplicate_3****
>
> 3899****
>
> 5799****
>
> 468****
>
>  ****
>
> 4339****
>
> 6239****
>
> 908****
>
>  ****
>
> 4822****
>
> 6722****
>
> 1391****
>
>  ****
>
> 3050****
>
> 5010****
>
> 70****
>
> Duplicate_2****
>
> ** **
>
> ** **
>
> Terima Kasih,****
>
> Salam,****
>
> ** **
>
> Fano TheMiner****
>
> ** **
>
> ** **
>
> ** **
>
> ** **
>
>  
>

Attachment: re-Cari Nilai Duplikat.xlsx
Description: application/vnd.openxmlformats-officedocument.spreadsheetml.sheet

Kirim email ke