Coba ganti Codenya seperti ini:
Private Sub CommandButton1_Click()
'Untuk Mengisi Sheet1 Kolom 2, 3 dan 4
Range("B3") = "=VLookup(A3, Data!A2:D9, 2, False)"
Range("C3") = "=VLookup(A3, Data!A2:D9, 3, False)"
Range("D3") = "=VLookup(A3, Data!A2:D9, 4, False)"
'langsung divalue
Range("B3:D3") = Range("B3:D3").Value
End SubRegards, Hendrik Karnadi ________________________________ From: Mr Pecut <[email protected]> To: belajar xl <[email protected]> Sent: Wednesday, 7 March 2012, 9:38 Subject: [belajar-excel] Belajar Pencarian B-excel, Aku kepingin belajar macro dikit-demi dikit, mencomot bahasa macronya dari salah satu web lain, kasih pencerahannya dong untuk aplikasinya.... Maaf, banyak bertanya-tanya... Best Regards, Mr Pecut
Belajar Vlookup Dengan Macro.xlsm
Description: application/vnd.ms-excel.sheet.macroenabled.12
