IMPORT MULTI FILE EXCEL DI ACCES 3

Akhirnya ada waktu senggang untuk membuat sedikit postingan, sebelumnya aku sudah pernah membuat postingan mengenai IMPORT FILE EXCEL KE ACCES DENGAN COMMAND BUTTON, dimana dalam import file excel tersebut hanya satu file excel yang bisa di import ke acces....

Lalu bagaimana bila ingin melakukan import banyak file excel ke acces...? Sebenarnya caranya tidak terlalu banyak perubahan dari postingan IMPORT FILE EXCEL KE ACCES DENGAN COMMAND BUTTON, dimana kondisinya untuk melakukan perintah import file excel adalah tetap menggunakan perintah :

DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel9, "Tbl_MultiImporExcel", namafile, True

Dan sedikit tambahan perintah untuk mencari file excel yaitu :

For intFile = 1 To UBound(strFileList)  namafile = path & strFileList(intFile)  DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel9, "Tbl_MultiImporExcel", namafile, True  Next intFile

Untuk mempelajari lebih lanjut contoh file-nya bisa di langsung di DOWNLOAD disini.