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 <[email protected]>
To: [email protected]
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
