Membuat Tombol Print Di Layar Kerja Microsoft Office Excel
Jika Anda penasaran dan ingin mencobanya membuat sendiri tombol perintah print di Office Excel caranya cukup mudah. Hal pertama yang harus kita lakukan adalah membuat tombolnya dulu. Dalam membuat tombol bebas, silakan Anda pilih mana yang lebih disukai atau lebih mudah membuatnya. Kita bisa membuat tombol dengan Shapes, Picture, dan Clip Art. Disarankan jika Anda ingin membuat tombol print dari gambar maka gambar tombol tersebut berekstensi png.
Dalam contoh disini saya membuat tombol print dengan menggunakan Shapes saja. Caranya dari menu Insert > Shapes > kemudian pilih Shapes yang menurut kita cukup bagus untuk dibuat tombol print. Disini saya memilih jenis Shapes Text Box.
Agar tampilan tombol lebih menarik lagi, silakan Anda beri warna sesuai dengan kesukaan.
Sekarang Anda buka jendela Microsoft Visual Basic (VBA) dengan cara menekan tombol Alt+F11 pada keyboard. Kemudian klik pilih menu Insert > Module dan pastekan kode berikut kedalam layar kerja Module.
Sub Cetak () ActiveSheet.PrintOut End Sub
Langkah selanjutnya Anda tutup layar kerja Visual Basic (VBA) dan kembali kehalaman Office Excel. Sekarang coba Anda klik kanan pada kotak/tombol yang tadi telah dibuat kemudian klik pilih Assign Macro.
Sekarang dihadapan kita adalah kotak dialog pop-up Assign Macro. Silakan Anda pilih Cetak dan klik pilih OK.
Pada kode perintah untuk mencetak diatas terdapat kode ActiveSheet.PrintOut, kode ini berfungsi agar bisa mencetak Sheet yang aktif. Selain kode perintah ini kita bisa menggunakan alternatif kode lainnya, seperti :
| Kode Visual Basic (VBA) | Fungsi Kode |
| Sheets.PrintOut | Mencetak semua Sheet |
| Sheets(“Sheet1”).PrintOut | Mencetak Sheet 1 yang aktif |
| Sheet1.PrintOut | Mencetak Sheet 1 yang aktif |
| ActiveWorkbook.PrintOut | Mencetak Workbook yang aktif |
| Worksheets.PrintOut | Mencetak semua Worksheet |
| Range (“A1:F10”).PrintOut | Mencetak data di Range A1:F10 |
| Selection.PrintOut | Mencetak Range yang dipilih atau diblok |
| Sheets(Array(“Sheet1″,”Sheet3”)).PrintOut | Mencetak Sheet1 & Sheet3 (Sheet yang terdapat didalam Array) |
Apakah kita bisa menentukan parameter-parameter lainnya seperti kita ingin menampilkan dulu halaman Print Preview, mencetak beberapa halaman, dan sebagainya? Jawabannya tentu saja bisa! Silakan Anda lihat parameter-parameter yang dapat kita gunakan dalam memodifikasi tombol print di Office Excel.
| Pilihan | Fungsi |
| From | Fungsi untuk memberi perintah agar halaman pertama saja yang dicetak. |
| To | Fungsi untuk memberi perintah agar halaman terakhir saja yang dicetak. |
| Preview | Menampilkan halaman Print Preview sebelum mencetak (True atau False). |
| Copies | Jumlah salinan yang ingin dicetak. Namun jika kita mengabaikan parameter ini maka hanya akan mencetak satu kali saja. |
| PrintToFile | Memilih True untuk mencetak ke File. |
| ActivePrinter | Untuk mengatur nama printer aktif jika driver printer komputer kita lebih dari satu printer. |
| IgnorePrintAreas | Mengabaikan Print Area (True atau False). |
| Collate | Memilih True untuk menyusun beberapa salinan. |
| PrToFileName | Menentukan nama file yang ingin di cetak, dan itupun jika pilihan PrintToFile bernilai True. |
Contoh jika kita membuat kode tombol print dengan parameter-parameter tertentu adalah sebagai berikut :
Sub Cetak () ActiveSheet.PrintOut Preview:=True, From:=2, To:=5, Copies:=5 End Sub
Artinya adalah kita akan memberikan perintah print untuk Sheet yang aktif dan kita ingin menampilkan halaman Print Preview dulu lalu halaman yang diprint adalah dari halaman 2 sampai dengan halaman 5 sebanyak 5 lembar.
Semoga artikel ini ada manfaatnya dan sampai bertemu lagi diartikel menarik lainnya. Salam sukses.
