Coba macronya dibuat seperti ini :
Sub IsiDataPEL()
Range("B4").Value = Evaluate("=IFERROR(VLOOKUP(B3,IDPEL,2,FALSE),"""")")
Range("B5").Value = Evaluate("=IFERROR(VLOOKUP(B3,IDPEL,3,FALSE),"""")")
If Range("B4") = vbNullString Then
MsgBox "ID Pelanggan yang anda masukkan belum terdaftar",
vbInformation, "P E S A N "
End If
End SubFile terlampir. Salam, HK On Sunday, 1 December 2013, 14:32, Trio Duo <[email protected]> wrote: Dear Para Master, Mohon Pencerahan bagaimana cara menghilangkan #N/A dan memunculkan (MsgBox) jika ID Pelanggan yang dimasukkan tidak terdaftar dalam database... Terimakasih...
HK_vlookup+vba.xlsm
Description: application/vnd.ms-excel.sheet.macroenabled.12

