Sabtu, 26 Januari 2013

MENCETAK SELURUH DOKUMEN YANG TERBUKA



MENCETAK SELURUH DOKUMEN YANG TERBUKA

Pertama-tama buka Microsoft Word. Selanjutnya, buka Tool Visual Basic Editor dari menu Tools | Macro | Visual Basic Editor. Setelah itu dalam jendela utama VBE, buat modul baru melalui Insert | Module. Salin list makro ke dalam modul tersebut. Jika sudah jalankan perintah Debug | Compile Project. Setelah selesai mengcompile makro tersebut, tutup VBE untuk kembali ke lembar kerja Microsoft Word.
Untuk memudahkan dalam mengakses makro tersebut, harus mengintegrasikan makro ke dalam Microsoft Word. Caranya klik Tools | Macro | Macros. Klik pilihan Printalldocument lalu tekan Organizer. Dalam jendela Organizer, aktifkan tab Macro Project Items. Copy Module1 yang ada disebelah kiri ke dalam Normal.Dot di bagian kanan lalu klik Close. Sampai sini, makro sudah terintegrasi dengan baik pada Microsoft Word.
Sekarang, tinggal membuat tombol shortcutnya yang bisa diletakkan di area toolbar atau menubar. Caranya, klik Tools | Customize lalu aktifkan tab commands. Cari Macros di bagian Categories lalu drag pilihan Normal.Module1.Printalldocuments ke area toolbar atau menubar yang masih kosong. Jika sudah, klik kanan tombol shortcut baru tersebut dan ganti namanya sesuai keinginan dalam bagian Name. Pilih icon yang disenangi dari Change Button Images. Jika semua langkah di atas sudah dilakukan, tutup Customize.
Sekarang tombol shortcut tersebut sudah bisa digunakan.
Sub PrintAllDocuments()
                        Step through the open document windows
            For Each Doc In Documents
                        Doc.PrintOut
Next Doc
End Sub

0 komentar:

Posting Komentar

Dynamic Blinkie Text Generator at TextSpace.net

Welcome

Powered By Blogger

Pesan Pembuka

O'Clock

animasi blog

Harapan

nopri-diningrat.blogspot.com

Tabel List

TUTORIAL BLOG

TRIK FACEBOOK

TECHNO

Kegagalan Adalah Suatu Kesuksesan Yang Tertunda
Follows: Twitter: @nopri_bikers
Facebook: nopri diningrat
E-mail: nopri_tdr@yahoo.com




Sabtu, 26 Januari 2013

MENCETAK SELURUH DOKUMEN YANG TERBUKA



MENCETAK SELURUH DOKUMEN YANG TERBUKA

Pertama-tama buka Microsoft Word. Selanjutnya, buka Tool Visual Basic Editor dari menu Tools | Macro | Visual Basic Editor. Setelah itu dalam jendela utama VBE, buat modul baru melalui Insert | Module. Salin list makro ke dalam modul tersebut. Jika sudah jalankan perintah Debug | Compile Project. Setelah selesai mengcompile makro tersebut, tutup VBE untuk kembali ke lembar kerja Microsoft Word.
Untuk memudahkan dalam mengakses makro tersebut, harus mengintegrasikan makro ke dalam Microsoft Word. Caranya klik Tools | Macro | Macros. Klik pilihan Printalldocument lalu tekan Organizer. Dalam jendela Organizer, aktifkan tab Macro Project Items. Copy Module1 yang ada disebelah kiri ke dalam Normal.Dot di bagian kanan lalu klik Close. Sampai sini, makro sudah terintegrasi dengan baik pada Microsoft Word.
Sekarang, tinggal membuat tombol shortcutnya yang bisa diletakkan di area toolbar atau menubar. Caranya, klik Tools | Customize lalu aktifkan tab commands. Cari Macros di bagian Categories lalu drag pilihan Normal.Module1.Printalldocuments ke area toolbar atau menubar yang masih kosong. Jika sudah, klik kanan tombol shortcut baru tersebut dan ganti namanya sesuai keinginan dalam bagian Name. Pilih icon yang disenangi dari Change Button Images. Jika semua langkah di atas sudah dilakukan, tutup Customize.
Sekarang tombol shortcut tersebut sudah bisa digunakan.
Sub PrintAllDocuments()
                        Step through the open document windows
            For Each Doc In Documents
                        Doc.PrintOut
Next Doc
End Sub


Kata Kata Bijak

Kesalahan adalah pengalaman hidup, belajarlah darinya. Jangan mencoba tuk menjadi sempurna. Cobalah menjadi teladan bagi sesama.

Nasihat Sukses

Jika Anda tidak mampu mendekatinya, mengatasinya atau melewatinya, lebih baik Anda bernegosiasi dengannya.

Kata-Kata Mutiara

MOTIVASI : Jangan berhenti berupaya ketika menemui kegagalan. Karena kegagalan adalah cara Tuhan mengajari kita tentang arti kesungguhan.

Box Coment

 
Template Indonesia | nopri diningrat
Aku cinta Indonesia_ Nopri diningrat_ Pagaralam