Taruh di Sheet1: Sub ApaCoba() a = [COUNTA(B3:B20)] b = [COUNTA(E4:E20)] For i = 3 To (a + 3) With Sheets("hasil") For j = 4 To b + 3 Z = .Cells(.Rows.Count, 1).End(xlUp).Row + 1 .Cells(Z, 1).Resize(1, 2).Value _ = Cells(j, 5).Resize(1, 2).Value .Cells(Z, 3).Value = Cells(i, 2).Value .Cells(Z, 4).Value = _ .Cells(Z, 1).Value & .Cells(Z, 3).Value Next End With Next End Sub
>semoga bermanfaat ________________________________ From: sepriansyah encep <citra_en...@yahoo.co.id> To: belajar-excel@yahoogroups.com Sent: Thu, August 5, 2010 3:07:55 PM Subject: [belajar-excel] Create Template Gabung fild Dear All Master, Mohon bantuannya, Saya punya 2 master data yag akan digabungkan, Setiap master memliki Code sebagai kunci nya, saya ingin menggbungkan 2 kunci itu yg akan saya gunakan sebagai kunci untuk data yg lain, Permasalahannya: Dikarenan Master data tidak tetap jumlah nya maka saya kesulitan untuk menggabungkan data nya... untuk lebih jelasnya lihat attch, Mohon bantuannya para master,adakah solusi nya agar saya tdk manual membuatnya karena datanya cukup banyak dan ini merupakan pekerjaan rutinitas... Tx, Syepriansyah