terimakasih mas hendrik maaf cara itu di office 2003 punyaku kok tidak ada menu Data-Removeduplicates dan terimakasih bu siti, tapi kalo 1.tanpa bantuan inputbox dan kolom yang di tuju itu pasti kolom A 2.sebelum melakukan proses Delete.di tampilkan MsgBox yang menanyakan mau di delete atau tidak dan menampilkan jumlah yang kembar itu ada sekian item, jika ya langsung aja proses deletingnya
mohon maaf jika tambahannya lebih banyak dari permintaan semula terimakasih. Sidol ----- Original Message ----- From: siti Vi To: belajar-excel@yahoogroups.com Sent: Monday, April 12, 2010 5:22 PM Subject: Re: [belajar-excel] delete range kembar Sub DelDelDel(Rg As Range) ' siti Vi / delete rows sisakan data uniq ' bluewater 12 apr 2010 '----------------------------------------- Dim C As Range, n As Long, T As String T = "|" For Each C In Rg If InStr(1, T, "|" & C & "|") = 0 _ Then T = T & C & "|" Else C = "" Next C For n = Rg.Rows.Count To 1 Step -1 If Rg(n, 1) = "" Then Rg(n, 1).EntireRow.Delete Next n End Sub ------------------------------------------------------------------------------ ----- Original Message ----- From: PP 03 To: belajar-excel@yahoogroups.com Sent: Monday, April 12, 2010 4:10 PM Subject: [belajar-excel] delete range kembar para pakar excel mohon bantuannya gimana cara jika kolom A ada yang sama baris yang sama tersebut di delete dan menyisakan 1 yang pertama lebih jelasnya lihat lampiran mohon maaf bila pernah di posting terimakasih Sidol