Cara Menggunakan Excel VBA untuk Mencetak

Jutaan pemilik usaha kecil dan pengusaha di seluruh dunia menggunakan Microsoft Excel untuk membantu tugas akuntansi, peramalan, dan inventaris. Dengan alat terintegrasi Excel, relatif mudah untuk mengirim spreadsheet atau buku kerja ke seseorang di email sebagai lampiran. Namun demikian, ada banyak kali ketika tidak ada yang mengalahkan salinan keras data spreadsheet. Tentu saja, Anda dapat menggunakan opsi menu "File | Print" pada bilah pita untuk membuat versi cetak spreadsheet Anda. Namun, dengan menggunakan Visual Basic for Applications, atau VBA, Anda juga dapat membuat tombol makro atau perintah untuk melakukan berbagai tugas pencetakan dalam Excel jauh lebih cepat dan lebih efisien.

Aktifkan Tab Pengembang

1.

Luncurkan Microsoft Excel dan buka buku kerja atau templat di mana Anda ingin memprogram fungsi pencetakan VBA. Klik "File" pada pita Excel, dan kemudian "Opsi."

2.

Temukan dan klik tajuk "Sesuaikan Pita" di panel kiri jendela "Opsi Excel". Klik kotak centang di sebelah "Pengembang" di bagian Tab Utama di bawah label "Sesuaikan Pita".

3.

Klik tombol "OK" untuk mengaktifkan tab "Pengembang" pada pita dan tutup jendela "Opsi Excel". Setelah Anda menutup jendela Opsi, Excel menampilkan tab pengembang di bilah pita secara otomatis.

Buat Tombol Cetak dengan VBA

1.

Klik tab "Pengembang" pada pita. Klik panah tarik-turun ikon "Sisipkan" di bagian "Kontrol" pada tab "Pengembang". Klik ikon "Kontrol Tombol" di bawah "Kontrol Bentuk."

2.

Klik sel di spreadsheet tempat Anda ingin meletakkan tombol cetak. Setelah Anda mengklik dan memilih sel, jendela "Tetapkan Makro" muncul secara otomatis.

3.

Masukkan "PrintCurrentSheet" atau yang serupa di bidang "Nama Makro". Jangan gunakan spasi di nama makro. Klik tombol "Baru". Jendela editor Visual Basic for Applications muncul dan menampilkan jendela kode baru.

4.

Tempatkan kursor mouse di ruang baris antara nilai "Sub PrintCurrentSheet ()" dan "End Sub". Ketikkan perintah berikut:

ActiveSheet.PrintOut

5.

Klik ikon floppy disk pada bilah alat editor VBA untuk menyimpan kode. Tutup jendela editor VBA.

6.

Klik kanan tombol perintah baru dan sorot teks "Tombol 1" default. Ubah teks label tombol menjadi "Cetak Cepat" atau nama deskriptif lainnya.

7.

Klik tombol perintah baru. Excel mencetak spreadsheet aktif pada printer Windows default tanpa menampilkan kotak dialog "Cetak" normal.

Kiat

  • Anda bisa menggunakan metode yang sama untuk membuat banyak fungsi cetak di Excel menggunakan VBA. Langkah-langkah untuk membuat tombol fungsi cetak adalah sama; sintaks perintahnya berbeda.
  • Untuk mencetak semua lembar kerja di buku kerja saat ini tanpa menampilkan jendela dialog Print, ganti perintah "ActiveSheet.PrintOut" dengan "Worksheets.PrintOut" atau "ActiveWorkbook.PrintOut" - tanpa tanda kutip.
  • Anda dapat membuat tombol cetak cepat hanya untuk sel yang Anda pilih dengan mouse Anda dengan menggunakan perintah "Selection.PrintOut" dalam kode VBA.
  • Jika Anda ingin mencetak ke printer tertentu selain dari standar Windows, gunakan kode berikut untuk tombol perintah di jendela kode VBA:
  • Sub QuickChangePrinter ()
  • Dim sNewPrinter As String
  • sNewPrinter = ActivePrinter
  • ActivePrinter = "Masukkan nama Windows printer di sini"
  • Application.PrintOut FileName: = ""
  • ActivePrinter = sNewPrinter
  • End Sub

Pesan Populer