Membuat Link WoorkSheet Excel ke Word Dengan VBA

I Am Jhon Contoh File

Bumiseran.blogspot.co.id – Aplikasi Microsoft Excel dan Microsoft Word punya peran yang sangat penting dalam menyelesaikan pekerjaan. Ada kalanya dalam kondisi tertentu kita menggunakan keduanya untuk mengolah data dan membuat laporan dengan data yang sama. Banyak yang dapat kita lakukan dengan Microsoft Excel dalam mengolah data, hal yang tidak maksimal dilakukan di Microsoft word. Sedangkan Microsoft Word unggul dan kaya dengan fitur-fitur pengolah kata. Seperti contoh, membuat format surat akan lebih mudah jika kita mengerjakan di Microsoft Word, sedangkan untuk mengolah data tabel Microsoft Excel yang lebih kita pilih. Bagaimana jika surat yang kita buat di Microsoft Word mengandung data-data yang kita buat di Microsoft Excel?. Permasalahannya adalah bagaimana meng-koneksi-kan atau membuat link data yang ada di Microsoft Excel ke Microsoft Word.

Baca Juga : MEMBUATFUNCTION SENDIRI UNTUK DISEMATKAN PADA MICROSOFT OFFICE EXCEL

Tentu saja, antara Microsoft Excel dan Microsoft Word dapat dikoneksikan karena mereka keduanya merupakan keluarga Microsoft Office. Pada artikel kali ini saya mencoba memberikan contoh dan penjelasan sederhana untuk melakukan koneksi atau link data Microsoft Excel ke Microsoft Word. Dengan menggunakan VBA Word kita dapat mengambil data atau nilai cell yand ada pada Microsoft Excel ke Microsoft Word. Pada artikel-artikel sebelumnya, kita lebih sering membuat macro di aplikasi excel, tapi kali ini kita akan membuat macro word. Hal ini dikarenakan kita akan mengambil nilai atau data yang ada pada Microsoft Excel untuk kita tampilkan di Microsoft Word.

Sebagai contoh kasus, perhatikan gambar file excel yang telah kami siapkan dibawah ini :

Contoh Data Excel

Ketika kita ingin melakukan pelaporan melalui Microsoft Word yang melibatkan data tabel di atas, maka kita harus mengintegrasikan data Microsoft Excel tersebut dengan Microsoft Word. Kita dapat membuatnya dengan VBA Microsoft Word. Sebagai contoh : terdapat nilai grand total di cell E6, yang akan kita buatkan link ke sebuah file microsoft word. Untuk langkah pertama, tentu saja kita harus menyiapkan sebuah file excel yang akan kita buat link excel word (excel to word). Kita dapat membuat file yang seperti contoh pada gambar di atas.

Membuat Link WoorkSheet Excel ke Word Dengan VBA

Tahap kedua, kita akan membuat file word untuk kita tampilkan data excel ke word. Bukalah aplikasi Microsoft Word kemudian buka menu Developer lalu klik icon Design Mode. Buatlah  sebuah Command Button dan  Label yang ditempatkan sesuai dengan keinginan kita. Untuk lebih jelasnya lagi kita lihat gambar di bawah ini.

 

File Microsoft Word yang akan kita buat untuk menampilkan data excel.

Keterangan Gambar :

1.    Merupakan menu Icon Desain Mode

2.    Icon ActiveX form control

3.    Icon untuk membuat Label

4.    Label yang telah dibuat

5.    icon untuk membuat Command Button

6.    Command Button yang telah dibuat.

Setelah kita buat dokumen Microsoft Word seperti di atas, maka sekarang kita atur properti command button dan label yang telah dibuat. Ubahlah penamaan Label menjadi mylabel pada jendela properti label. Untuk menampilkan jendela properti anda dapat mengklik Label1 kemudian klik Properties. Untuk lebih jelas lihat gambar di bawah ini.

1. 

   Menampilkan Jendela Properties dan Merubah nilai Properti objek Label

Keterangan gambar :

1.    Pilih atau klik objek Label

2.    Klik icon Properties

3.    Jendela Properties akan tampil, lalu ubah nilai name label menjadi myLabel

Kode VBA Untuk Membuat Link WoorkSheet Excel ke Word Dengan VBA

Setelah file excel sudah disiapkan dan file Word sudah selesai kita buat, sekarang waktunya kita mengisikan kode VBA pada Microsoft word dan sebagai triger, kita sudah siapkan objek Command Button. Klik dua kali pada object command button agar jendela Visual Basic Editor tampil. lalu sisipkan kode di bawah ini :

 

Kode VBA Macro

Untuk lebih jelas anda dapa melihat gambar seperti di bawah ini. 

Visual Basic Editor Microsoft Word

Perlu kita perhatikan pada baris (“D:\Test.xlsx”) merupakan source dan nama file excel yang telah kita siapkan dan akan kita ambil nilainya untuk ditampilkan di Microsoft Word. Pada bagian (“Sheet1”) merupakan nama sheetnya dan cells(6,5) merupakan letak nilai atau sell.

Selanjutnya, untuk menghubungkan Excel ke Word, kita perlu referensi Microsoft Excel di Microsoft Word. Klik menu Tools pada menu lalu pilih references, maka akan tampil jendela references lalu cari dan pilih “Microsoft Excel 12.0 Object Library“. Setelah itu  simpan dan tutup jendela Micrososft Visual Basic Editor.

Sekarang anda dapat mencoba menjalankan file microsoft word yang telah kita berikan kode visual Basic untk melakukan link excel word.

Nilai Excel yang tampil pada Word

Pada kasus ini kita menggunakan Command Button untuk menjalankan script visual basic, kita dapat melakukan modifikasi dengan meletakkan script tersebut pada event DocumentOpen() jika kita mau script ini berjalan langsung tanpa klik tombol. Sekian Terima Kasih Semoga berguna. Baca Juga Artikel kami tentang : MEMBUAT PASSWORD WOORKSHEET BERGANTI SESUAINAMA HARI