Memanggil procedure dari aplikasi lain

VBA didalam Microsoft Access dapat pula memanggil procedure dari aplikasi lain, seperti Microsoft Excel. Misalnya saja Anda hendak menggunakan rumus ROUNDOWN yang terdapat pada Microsoft Excel didalam VBA, maka Anda dapat melakukan langkah-langkah sebagai berikut:

1.      Pada jendela VBA, klik menu Tools References.

2.      Beri tanda centang pada pilihan Microsoft Excel 10.0 Object Library (Bila Microsoft Office pada PC Anda menggunakan versi yang lebih baru, maka gunakanlah Object Library pada Microsoft Excel ini yang lebih baru, misalnya untuk Microsoft Office Excel 2003 adalah Microsoft Excel 11.0 Object Library).

3.      Klik tombol OK.

4.      Buat module baru, kemudian tambahkan kode dibawah ini:

Public Function rmsRoundDownExcel()

rmsRoundDownExcel = Excel.WorksheetFunction.RoundDown(123456, -3)

End Function

5.      Jalankan pada immediate window fungsi diatas, maka akan muncul hasil: 123000.

Untuk mengetahui procedure dan object apa saja yang terdapat pada Microsoft Excel Object Library ini, silahkan ikuti langkah-langkah sebagai berikut:

1.      Pada jendela VBA, klik menu View Object Browser.

2.      Pada combo box “Project/Library”, pilih “Excel”.

3.      Maka akan muncul semua object yang terdapat pada library Excel.


 Gambar Object Browser untuk library Excel

Leave a Reply

%d bloggers like this: