Cetakan VBA

Cetakan dalam VBA sangat mirip dengan cetakan di excel, apabila kita mempunyai data penting dalam excel atau spreadsheet maka satu-satunya cara untuk memastikannya selamat adalah menyimpannya ke pdf atau mencetaknya, untuk mencetak kita perlu menyiapkan perintah cetak di VBA terlebih dahulu sebelum menggunakannya, apa yang dilakukan perintah ini jika mencetak atau menulis data ke dalam fail lain.

Apakah Cetakan dalam VBA Excel?

Cetakan VBA tidak lain adalah seperti biasa, bagaimana kita mencetak dalam lembaran kerja biasa, tidak ada perbezaan dalam hal ini. Dengan menggunakan kod Excel VBA kita dapat mencetak keseluruhan data lembaran kerja, kita dapat mencetak buku kerja, carta, julat yang ditentukan, dll.

Setelah semua kerja keras kami lakukan untuk menyampaikan laporan itu kepada pengurus, kami biasanya menghantar e-mel. Tetapi dalam beberapa kes dalam perjumpaan, pengurus anda memerlukan salinan laporan anda, dalam senario tersebut anda perlu mencetak laporan yang anda miliki di spreadsheet. Salah satu sebab pengurus anda memerlukan cetakan laporan tersebut adalah laporan yang sangat besar untuk dibaca di komputer. Dalam lembaran kerja, anda mesti sudah biasa mencetak laporan. Dalam artikel ini, kami akan menunjukkan kepada anda cara mencetak menggunakan pengekodan VBA. Ikuti artikel ini selama 15 minit seterusnya untuk mengetahui cara mencetak laporan di VBA.

Sintaks VBA PrintOut dalam VBA Excel

Sebelum kita melihat sintaksnya, izinkan saya menjelaskannya terlebih dahulu. Apa yang kita cetak, kita mencetak julat, carta, lembaran kerja, buku kerja. Oleh itu kaedah PrintOut () tersedia dengan semua objektif ini.

[Dari]: Dari halaman mana pencetakan harus dimulakan. Sekiranya kita tidak memberikan sebarang nilai, ia akan dianggap seperti dari halaman pertama.

[Kepada]: Apakah halaman terakhir yang perlu dicetak? Sekiranya diabaikan ia akan dicetak hingga halaman terakhir.

[Salinan]: Berapa banyak salinan yang perlu anda cetak.

[Pratonton]: Adakah anda ingin melihat pratonton cetak sebelum meneruskan mencetak. Sekiranya ya BENAR adalah hujah, jika tidak SALAH adalah hujah.

Contoh Cetakan dalam VBA Excel

Berikut adalah contoh Cetakan dalam VBA Excel.

Anda boleh memuat turun Templat Cetak Excel VBA ini di sini - Templat Cetak Excel VBA

Untuk tujuan ilustrasi, saya telah membuat data palsu seperti yang ditunjukkan dalam gambar di bawah.

Sekarang kita perlu mencetak laporan dari A1 hingga D14, ini adalah jangkauan saya. Masukkan julat dalam kod VBA untuk mengakses kaedah PrintOut.

Kod:

 Sub Cetak_Contoh1 () Julat ("A1: D14") Sub Akhir 

Sekarang akses kaedah PrintOut.

Kod:

 Sub Cetak_Contoh1 () Julat ("A1: D14"). Sub PrintOut End 

Saya tidak menyentuh sebarang parameter, ini cukup untuk mencetak julat yang dipilih. Sekiranya saya menjalankan kod ini, ia akan mencetak julat dari sel A1 hingga D14.

Parameter Kaedah Cetakan dalam VBA Excel

Sekarang saya telah menyalin dan menampal data yang sama untuk menggunakan parameter lain kaedah PrintOut dalam VBA Excel.

Apabila kita ingin mencetak keseluruhan helaian, kita boleh merujuk keseluruhan lembaran sebagai Lembaran Aktif, ini akan merangkumi keseluruhan helaian di dalamnya.

  • Kod untuk Mencetak Seluruh Lembaran Kerja.

Kod:

Sub Print_Example1 () ActiveSheet.UsedRange.PrintOut 'Ini akan mencetak keseluruhan julat helaian yang digunakan. Sub Akhir

  • Kod untuk Merujuk Nama Helaian .

Kod:

 Sub Print_Example1 () Sheets ("Ex 1"). UsedRange.PrintOut 'Ini juga akan mencetak keseluruhan julat helaian yang digunakan yang disebut Ex 1. End Sub 

  • Kod untuk Mencetak semua Lembaran Kerja di Buku Kerja .

Kod:

Sub Print_Example1 () Lembaran Kerja.UsedRange.PrintOut 'Ini juga akan mencetak keseluruhan julat semua helaian yang digunakan dalam buku kerja. Sub Akhir

  • Kod untuk Mencetak Keseluruhan Data Buku Kerja .

Kod:

Sub Print_Example1 () ThisWorkbook.UsedRange.PrintOut 'Ini juga akan mencetak keseluruhan julat semua helaian yang digunakan dalam buku kerja. Sub Akhir

  • Kod untuk Mencetak Hanya Kawasan Terpilih .

Kod:

 Sub Print_Example1 () Selection.PrintOut 'Ini akan mencetak hanya julat Sub Sub yang dipilih 

Bagaimana cara menggunakan Parameter of Print Out Method di Excel VBA?

Sekarang kita akan melihat bagaimana menggunakan parameter kaedah mencetak. Seperti yang saya katakan, saya telah memperluas data untuk menggunakan sifat lain.

Yang pasti ini tidak akan dicetak dalam satu helaian. Pilih julat sebagai A1 hingga S29.

Kod:

 Sub Cetak_Contoh2 () Julat ("A1: S29") Sub Akhir 

Sekarang pilih kaedah mencetak.

Kod:

 Sub Cetak_Contoh2 () Julat ("A1: S29"). SubCetak Akhir 

Parameter pertama & kedua adalah Dari & Ke, apakah kedudukan halaman permulaan & akhir. Secara lalai ia akan mencetak semua halaman, jadi saya tidak menyentuh bahagian ini. Sekarang saya ingin melihat pratonton cetak jadi saya akan memilih Pratonton sebagai BENAR.

Kod:

 Sub Cetak_Contoh2 () Julat ("A1: S29"). Pratonton PrintOut: = Sub Akhir Benar 

Sekarang saya akan menjalankan kod ini, kita akan melihat pratonton cetak.

Ini terdapat dalam 2 halaman.

So first I want to set up the page to come in a single sheet. Use the below code to set up the page to come in one sheet.

Code:

 Sub Print_Example2() With Worksheets("Example 1").PageSetup .Zoom = False .FitToPagesTall = 2 .FitToPagesWide = 1 .Orientation = xlLandscape End With ActiveSheet.PrintOut Preview:= True End Sub 

This will set up the page to print in one sheet as well to print in landscape mode. Now the print preview will be like this.

Like this, we can use VBA print out a method to print the things we wanted to print and play around with them.