Bagaimana untuk memindahkan lembaran kerja Excel 2010 ke Access 2010 menggunakan VBA

Pengarang: Roger Morrison
Tarikh Penciptaan: 22 September 2021
Tarikh Kemas Kini: 14 November 2024
Anonim
Excel VBA Introduction Part 52.2 - Formatting Shapes
Video.: Excel VBA Introduction Part 52.2 - Formatting Shapes

Kandungan

Anda boleh mengatakan bahawa Microsoft Office Excel dan Akses Microsoft Office berjalan seiring apabila anda perlu mengimport data Excel dari pangkalan data Akses. Objek "DoCmd" mengandungi kaedah "TransferSpreadsheet" yang boleh digunakan untuk mengimport lembaran kerja ke Akses dari Excel menggunakan Visual Basic for Applications (VBA). Kaedah ini juga menyokong format fail lain, seperti Lotus. Begitu juga, anda boleh menggunakan kaedah yang sama untuk mengeksport data dari Access to Excel dengan menukar penghitungan "AcDataTransferType" kepada "acExport".


Arahan

Import data dari Excel ke Access menggunakan VBA (Ablestock.com/AbleStock.com/Getty Images)

    Arahan

  1. Mula Akses. Klik "Pangkalan Data Kosong" dan klik butang "Buat" untuk menghasilkan pangkalan data baru. Klik tab "Alat Pangkalan Data" dan kemudian "Visual Basic" untuk membuka tetingkap Microsoft Visual Basic. Klik menu "Sisipkan" dan kemudian "Modul" untuk memasukkan modul kod baru.

  2. Salin dan tampal kod berikut untuk mencipta subrutin baru:

    Import SubSeleksSpreadsheet Swasta ()

  3. Tekan "Enter" untuk menyerlahkan "Sub Akhir" rutin.

  4. Salin dan tampal kod berikut ke dalam rutin "ImportExcelSpreadsheet Sub" (rutin) untuk mengimport lembaran kerja Excel ke Akses:


    DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel9, _ "Employees", "C: Employees.xlsx", True

  5. Edit istilah "Pekerja" dan masukkan nama jadual yang digunakan untuk menyimpan lembaran kerja sasaran. Edit ungkapan "C: Employees.xlsx" dan masukkan laluan dan nama lembaran kerja Excel untuk diimport.

  6. Tekan "F5" untuk menjalankan rutin dan mengimport lembaran kerja Excel ke Akses.