Semua aplikasi kantor dari Microsoft mendukung otomatisasi. Mereka dapat berjalan sebagai server COM dan digunakan dari skrip yang disematkan pada dokumen atau skrip eksternal. Jadi, Anda dapat menulis data ke dokumen Excel dari skrip vba.
Diperlukan
- - menginstal aplikasi Microsoft Excel;
- - Editor Visual Basic / editor teks.
instruksi
Langkah 1
Buat wadah untuk meng-host kode vba. Jika skrip akan disematkan dalam dokumen, unggah file yang sesuai ke Microsoft Excel. Buka Editor Visual Basic dengan menekan Alt + F11. Jika perlu, buat modul baru (Item modul di menu Sisipkan). Buka salah satu modul atau formulir. Buat pengendali untuk kontrol formulir Anda, atau cukup tambahkan prosedur ke modul. Sebagai contoh:
Subtes ()
Akhir Sub
Jika Anda mengembangkan skrip yang berdiri sendiri (yaitu, akan berjalan di bawah Windows Script Host), maka cukup buat file dengan ekstensi vbs di editor teks.
Langkah 2
Dalam skrip yang disematkan dalam dokumen, tambahkan deklarasi variabel di awal prosedur:
Redupkan oWorkbook Sebagai Excel. Workbook
Redupkan oSheet Sebagai Excel. Lembar Kerja
Yang pertama adalah untuk menyimpan referensi ke objek buku kerja Excel, dan yang kedua untuk lembar.
Langkah 3
Inisialisasi variabel dengan referensi objek. Dalam skrip vbs, buat objek aplikasi Excel (ini akan meluncurkan Excel sebagai server COM):
Setel oApplication = CreateObject ("Excel. Application").
Dalam skrip yang disematkan dalam dokumen, objek Aplikasi global akan digunakan sebagai ganti variabel oApplication, yang merujuk ke objek aplikasi saat ini. Pilih yang sudah ada atau buka buku kerja Excel baru. Sebagai contoh:
Set oWorkbook = Application. Workbooks (1)
Setel oWorkbook = Application. Workbooks ("Book1")
Setel oWorkbook = oApplication. Workbooks. Open ("D: / vic / relevan / tmp / test.xls")
Dapatkan tautan ke lembar buku yang diinginkan:
Setel oSheet = oApplication. Sheets ("Sheet1")
Langkah 4
Tulis data ke Excel dari skrip vba. Gunakan koleksi Sel, yang merupakan properti dari objek lembar buku kerja yang dirujuk pada langkah sebelumnya, ke dalam variabel oSheet. Contoh penulisan string ke satu sel mungkin terlihat seperti ini:
oSheet. Cells (1, 1) = "String akan ditulis ke sel A1"
Langkah 5
Dalam skrip vbs, tambahkan kode untuk menyimpan data dan matikan aplikasi Excel:
oBuku kerja. Simpan
oApplication. Quit
Langkah 6
Simpan dan jalankan skrip. Di Editor Visual Basic, tekan Ctrl + S lalu posisikan kursor di badan prosedur dan tekan F5. Simpan skrip vbs ke disk dan kemudian jalankan sebagai file biasa.
