Kode VBA untuk Tombol Cetak di Excel (5 Contoh)

  • Bagikan Ini
Hugh West

Jika kita dapat mengatur Tombol Cetak kustom di lembar kerja Excel kita maka itu bisa sangat ramah pengguna dan menghemat waktu untuk mencetak lembar. Dengan menggunakan Makro VBA Jadi artikel ini akan memberi Anda 5 makro sederhana untuk digunakan VBA kode untuk tombol cetak di Excel.

Unduh Buku Kerja Praktik

Anda bisa mengunduh templat Excel gratis dari sini dan berlatih sendiri.

Kode VBA untuk Membuat Tombol Cetak.xlsm

5 Contoh Penggunaan Kode VBA untuk Tombol Cetak di Excel

Mari kita perkenalkan dataset kita terlebih dahulu yang mewakili beberapa tenaga penjual penjualan dalam berbagai Wilayah .

1. Gunakan Kode VBA untuk Membuat Tombol Cetak untuk Kotak Dialog Cetak di Excel

Pertama, kita akan membuat Tombol Cetak dan kemudian akan menulis kode untuk itu.

Langkah-langkah:

  • Klik sebagai berikut: Pengembang >> Sisipkan >> Kotak Kancing.

Segera setelah itu, Anda akan mendapatkan tanda plus (+) di dalam kursor .

  • Seret bahwa kursor sesuai dengan yang Anda inginkan ukuran tombol dan setelah beberapa saat, a kotak dialog bernama Tetapkan Makro akan terbuka.

  • Berikan nama dan tekan Baru .

A VBA akan muncul.

  • Kemudian ketik kode-kode berikut di dalamnya-
 Sub DialogBox() Application.Dialogs(xlDialogPrint).Show End Sub 
  • Sekarang kembali untuk Anda lembar .

Perincian Kode

  • Di sini, saya menciptakan Sub prosedur, DialogBox .
  • Kemudian digunakan Dialog (xlDialogPrint).Show untuk membuka Kotak dialog cetak .

Tombol sudah dibuat.

  • Klik kanan pada tombol dan pilih Edit Teks dari Menu konteks untuk mengubah nama tombol.

  • Kemudian, hanya jenis yang nama dan klik Anda tikus di mana saja di luar Tombol .

Kemudian tinggal tekan tombol Tombol .

Kemudian Anda akan mendapatkan Kotak dialog cetak Jika Anda ingin, Anda bisa Cetak sekarang.

Jika Anda tidak memiliki Printer pada saat ini Anda dapat Simpan itu sebagai PDF . untuk digunakan lebih lanjut atau untuk Cetak kemudian.

  • Sekarang tekan OK .

  • Pada saat ini berikan saja nama dan tekan Simpan .

Ini cetakannya PDF .

Baca selengkapnya: Cara Menyesuaikan Pengaturan Cetak di Excel (8 Trik yang Sesuai)

2. Gunakan Kode VBA untuk Membuat Tombol Cetak untuk Sheet Aktif

Di sini, kita akan menggunakan VBA untuk cetak an Aktif Lembar .

Langkah-langkah:

  • Ikuti dua langkah pertama dari bagian pertama untuk membuat tombol dan Menetapkan Makro .
  • Menulis Nama Makro dan tekan Baru .

Segera setelah itu, sebuah VBA jendela akan terbuka.

  • Kemudian menulis berikut ini kode di dalamnya-
 Sub ActiveSheet() ActiveSheet.PrintOut End Sub 
  • Kemudian, kembali ke

Perincian Kode

  • Di sini, saya menciptakan Sub prosedur, ActiveSheet .
  • Kemudian digunakan PrintOut untuk pilih yang lembar aktif dan cetak itu.
  • Sekarang saja tekan yang Tombol .

A kotak dialog bernama Simpan Output cetak sebagai akan terbuka.

  • Berikan nama dan tekan Simpan .

Kemudian Anda akan mendapatkan cetakan PDF .

Anda bisa dengan mudah mengubah printer jika Anda membutuhkannya.

  • Klik pada Berkas di samping Rumah

  • Kemudian pilih Cetak opsi dan klik pada drop-down untuk memilih Printer .

Baca selengkapnya: Cara Mencetak Semua Lembar di Excel (3 Metode)

3. Terapkan Kode VBA untuk Membuat Tombol Cetak untuk Lembar Terpilih di Excel

Jika Anda ingin Cetak spesifik lembar yang dipilih maka dimungkinkan juga menggunakan VBA .

Langkah-langkah:

  • Ikuti dua langkah pertama dari bagian pertama untuk membuat tombol dan menetapkan a makro .
  • Kemudian tulislah Nama Makro dan tekan Baru .

Segera setelah itu, sebuah VBA jendela akan terbuka.

  • Kemudian, jenis berikut ini kode di dalamnya-
 Sub SelectedSheets() ActiveWindow.SelectedSheets.PrintOut End Sub 

Kemudian kembali untuk Anda lembar .

Perincian Kode

  • Di sini, saya menciptakan Sub prosedur, Lembar Terpilih .
  • Kemudian digunakan JendelaAktif untuk pilih lembar dari aktif Excel jendela .
  • Selanjutnya, digunakan PrintOut untuk mencetak beberapa dipilih lembar .
  • Sekarang pilih lembar dan tekan tombol Tombol Cetak . saya memilih dua lembar.

  • Berikan nama untuk PDF dan tekan Simpan .

The PDF file memiliki t wo halaman untuk dua lembar .

Baca selengkapnya: Cara Mencetak Lembar Tertentu Menggunakan Makro VBA di Excel (4 Cara)

Bacaan serupa:

  • Cara Mencetak Lembar Excel dalam Ukuran A4 (4 Cara)
  • Cara Menyimpan Header di Excel Saat Mencetak (3 Cara)
  • Excel VBA: Cara Mengatur Area Cetak Secara Dinamis (7 Cara)
  • Cara Mencetak Lembar Excel dengan Garis (3 Cara Mudah)
  • Cara Mencetak Grafik di Excel (5 Cara)

4. Sematkan VBA Excel untuk Membuat Tombol Cetak untuk Lembar Tertentu dengan Rentang Terpilih

Di sini, kita akan membuat Tombol Cetak untuk cetak a rentang yang dipilih dari lembar khusus .

Langkah-langkah:

  • Ikuti dua langkah pertama dari bagian pertama untuk membuat tombol dan menetapkan makro.
  • Menulis Nama Makro dan tekan Baru .

Segera setelah itu, sebuah VBA jendela akan terbuka.

  • Kemudian menulis berikut ini kode -
 Sub SpecificSheetnRange() With Sheets("SpecificSheet+Range") .PageSetup.PrintArea = "B2:D11" .PrintOut End With End Sub 
  • Kemudian, kembali ke lembar Anda.

Perincian Kode

  • Di sini, saya menciptakan Sub prosedur, SpecificSheetnRange .
  • Kemudian digunakan Dengan pernyataan untuk pilih a spesifik
  • Selanjutnya, PrintArea = "B2:D11".PrintOut akan pilih yang rentang dari lembar khusus dan akan Cetak itu.
  • Sekarang saja tekan yang Tombol Cetak .

  • Tetapkan a nama untuk PDF dan tekan Simpan .

Ini adalah dicetak lembar khusus.

Baca selengkapnya: Excel VBA: Atur Area Cetak untuk Beberapa Rentang (5 Contoh)

5. Sematkan VBA Excel untuk Membuat Tombol Cetak untuk Lembar Aktif dengan Rentang Terpilih

Juga, Anda bisa pilih rentang dari lembar aktif dan dapat membuat Tombol Cetak untuk cetak itu menggunakan VBA .

Langkah-langkah:

  • Ikuti dua langkah pertama dari bagian pertama untuk membuat tombol dan menetapkan makro .
  • Kemudian, tulislah Nama Makro dan tekan Baru .

Segera setelah itu, sebuah VBA jendela akan terbuka.

  • Dalam VBA jendela, menulis berikut ini kode -
 Sub ActiveSheetnRange() Range("B2:D11").PrintOut End Sub 
  • Kemudian kembali untuk Anda lembar .

Perincian Kode

  • Di sini, saya menciptakan Sub prosedur, ActiveSheetnRange .
  • Kemudian digunakan Range("B2:D11").PrintOut untuk pilih a rentang dan cetak.
  • Tekan tombol Tombol Cetak .

  • Berikan nama dan tekan Simpan .

Kemudian Anda akan mendapatkan rentang cetak .

Baca selengkapnya: Tombol Excel untuk Mencetak Lembar Tertentu (Dengan Langkah Mudah)

Kesimpulan

Saya harap prosedur yang dijelaskan di atas akan cukup baik untuk menggunakan kode VBA untuk tombol cetak Jangan ragu untuk mengajukan pertanyaan apa pun di bagian komentar dan tolong beri saya umpan balik.

Hugh West adalah pelatih dan analis Excel yang sangat berpengalaman dengan pengalaman lebih dari 10 tahun di industri ini. Beliau meraih gelar Sarjana di bidang Akuntansi dan Keuangan dan gelar Master di bidang Administrasi Bisnis. Hugh memiliki hasrat untuk mengajar dan telah mengembangkan pendekatan pengajaran unik yang mudah diikuti dan dipahami. Pengetahuan ahlinya tentang Excel telah membantu ribuan siswa dan profesional di seluruh dunia meningkatkan keterampilan dan unggul dalam karier mereka. Melalui blognya, Hugh membagikan pengetahuannya kepada dunia, menawarkan tutorial Excel gratis dan pelatihan online untuk membantu individu dan bisnis mencapai potensi penuh mereka.