Terima kasih masukannya mr kid. From: belajar-excel@yahoogroups.com [mailto:belajar-excel@yahoogroups.com] Sent: Friday, December 12, 2014 11:46 AM To: BeExcel Subject: Re: [belajar-excel] Mewarnai data yang tidak sama antara kolom A dan kolom B
Ada yang punya ide lain ? Sapa tahu ada yang punya ide untuk menghindari loop ke banyak cells karena data pertama berisi 500ribu baris dan data kedua berisi 750ribu baris. Capek nunggunya gak kalo pakai loop ? 2014-12-12 13:49 GMT+11:00 SUYONO reza.suy...@lge.com<mailto:reza.suy...@lge.com> [belajar-excel] <belajar-excel@yahoogroups.com<mailto:belajar-excel@yahoogroups.com>>: Pagi Hendrik, Ikutan kuis, disini datanya saya asumsikan data tempatkan di Range("B3:B9")dan Range("C3:C9"). Semoga jawabanya bener…hehe.. hadiahnya apa pa…? di module Public Sub Warna(Rng1 As Range, Rng2 As Range) Dim JmlDt As Integer Dim cell As Range For Each cell In Rng1 JmlDt = Application.WorksheetFunction.CountIf(Rng2, cell) If JmlDt = 0 Then cell.Interior.Color = 255 End If Next For Each cell In Rng2 JmlDt = Application.WorksheetFunction.CountIf(Rng1, cell) If JmlDt = 0 Then cell.Interior.Color = 255 End If Next End Sub Skrip di tombol Private Sub CommandButton1_Click() Call Warna(Range("B3:B9"), Range("C3:C9")) End Sub From: belajar-excel@yahoogroups.com<mailto:belajar-excel@yahoogroups.com> [mailto:belajar-excel@yahoogroups.com<mailto:belajar-excel@yahoogroups.com>] Sent: Thursday, December 11, 2014 10:08 PM To: belajar-excel@yahoogroups.com<mailto:belajar-excel@yahoogroups.com> Subject: [belajar-excel] Mewarnai data yang tidak sama antara kolom A dan kolom B Yang ini quiz iseng sebelum tidur.....tapi jangan sampe ketiduran AA AA AC AB AB AD AD AE AB AA AD AG AF AB Bagaimana macronya agar: - data yang ada di kolom A tetapi tidak ada di kolom B atau - data yang ada di kolom B tetapi tidak ada di kolom A diberi tanda dengan warna merah. Jika datanya diubah diharapkan kita tidak perlu menghapus warna merah sebelumnya. Selamat mencoba. Salam, HK