Home » » Cara Membuat Tombol Cetak di Excel

Cara Membuat Tombol Cetak di Excel

Written By wahyuni on Sabtu, 11 April 2015 | 10.04.00

Membuat tombol Cetak atau tombol Print di lembar kerja Excel sebenarnya sangat mudah karena hanya memerlukan beberapa baris kode saja. Langkah-langkah untuk membuat tombol print adalah sebagai berikut:

  1. Tambahkan Shape atau gambar juga boleh ke lembar kerja Excel.

  2. Mencetak dengan VBA Excel

  3. Tekan Tombol Alt+F11 untuk menampilkan jendela Microsoft Visual Basic atau bisa juga dengan cara klik Tab Developer dan klik tombol Visual Basic.
  4. Buat Module dengan cara klik kanan pada VBAProject atau pada ThisWorkbook --> Insert --> Module.

  5. Membuat Tombol Cetak VBA Excel

  6. Akan tampil jendela Module(code), kemudian masukkan kode berikut:
  7. Sub Cetak()
    ActiveSheet.PrintOut
    End Sub
  8. Selanjutnya kembali ke Lembar kerja Excel, klik kanan pada Tombol Cetak yang tadi dibuat dan pilih Assign Macro...
  9. Pada jendela Assign Macro pilih Cetak dan kemudian klik OK.

  10. Mencetak dengan VBA Excel

  11. 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 aktifSelain memakai script atau code ActiveSheet.PrintOut bisa juga memakai code lain, seperti pada tabel berikut ini:

Code VBA Fungsi
ActiveWorkbook.PrintOut    Mencetak 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

Dalam perintah PrintOut juga terdapat beberapa parameter opsi yang bisa dipakai, selengkapnya bisa di lihat di tabel berikut ini:

Pilihan Fungsi
From Halaman pertama yang di cetak. Jika argumen ini di abaikan maka pencetakan otomatis dimulai dari halaman 1
To Halaman terakhir yang di cetak. Jika argumen ini di abaikan maka pencetakan sampai halaman terakhir  
Copies Jumlah Salinan yang di cetak. Jika di abaikan maka hanya satu kali cetak
Preview Menampilkan Print Preview sebelum mencetak (True atau False)
ActivePrinter Mengatur nama printer aktif
PrintToFile  Pilih True untuk mencetak ke File
Collate Pilih True untuk menyusun beberapa Salinan
PrToFileName Menentukan nama file yang ingin di cetak, jika opsi PrintToFile bernilai True
IgnorePrintAreas Mengabaikan Print Area (True atau False)

Contoh penggunaan PrintOut dengan parameter adalah:

ActiveSheet.PrintOut From:=1, To:=3, Copies:=3
Maksud dari code tersebut adalah mencetak aktif Sheet dari halaman 1 sampai 3 dengan jumlah salinan sebanyak 3 lembar. Begitulah cara membuat tombol cetak di Excel. Contoh File bisa di unduh disini.
Share this article :

1 komentar:

smansapari mengatakan...

tq bro sangat bermanfaat

Blogroll

POPULER POS

FIND ON FACEBOOK

CATEGORIES

Social Share

Random Posts

Flickr

Recent comments

Sponsor

Events

Recent Comments

 
Support : Proudly powered by Blogger
Copyright © 2011. INDAHNYA BERBAGI - All Rights Reserved
Template Design by Creating Website Published by KELOMPOK TANI SEMBADA
Selamat Datang di Bloger GIAN CELL I Kalisegung Candinegara