1. Langkah Pertama
Buat Shape untuk Tombol Print pada menu insert atau boleh juga menggunakan gambar.
2. Langkah Kedua
Tekan Tombol Alt+F11 untuk menampilkan jendela Microsoft Visual Basic atau mampu juga dengan cara klik Tab Developer dan klik tombol Visual Basic. Buat Module dengan cara klik kanan pada VBAProject atau pada ThisWorkbook --> Insert --> Module
3. Langkah Ketiga
Akan muncul Layar Module masukan kemudian masukkan arahan berikut:
Sub Cetak()
ActiveSheet.PrintOut
End Sub
4. Langkah Keempat
Selanjutnya kembali ke Lembar kerja Excel , klik kanan pada Tombol Cetak yang tadi dibuat dan pilih Assign Macro. Pada jendela Assign Macro pilih Cetak dan kemudian klik OK.
5. Langkah Terakhir
Selesai. Tinggal di coba apakah tombol print sudah berfungsi dengan benar ataukah masih ada debug atau error. Perintah ActiveSheet.PrintOut berfungsi untuk mencetak Sheet yang aktif. Selain memakai script atau code ActiveSheet.PrintOut mampu juga memakai code lain , menyerupai pada tabel berikut ini:
CODE VBA | FUNGSI |
ActiveWorkbook.PrintOut | workbook yang aktif |
Worksheets.PrintOut | Mencetak semua |
Worksheet Sheets.PrintOut | Mencetak semua Sheet |
Sheets("Sheet1").PrintOut | Mencetak Sheet 1 saja |
Sheet1.PrintOut | Mencetak Sheet 1 saja |
Sheets(Array("Sheet1" ,"Sheet3")).PrintOut | Mencetak Sheet1 dan Sheet3 (Sheet yg ada dalam Array) |
Selection.PrintOut | Mencetak Range yang di Select atau di blok Range |
("A1:F10").PrintOut | Mencetak data di range A1:F10 |
0 Response to "Tips Membuat Tombol Print Pada Ms. Excel"