Pernyataan Cetak VBA - Bagaimana cara menggunakan Excel VBA untuk Printout? (dengan Contoh)

Print di VBA sangat mirip dengan print di excel, ketika kita memiliki data penting di excel atau spreadsheet maka satu-satunya cara agar aman adalah dengan menyimpannya ke pdf atau mencetaknya, untuk mencetak kita perlu mengatur perintah print di VBA terlebih dahulu sebelum menggunakannya, apa yang dilakukan perintah ini jika mencetak atau menulis data ke file lain.

Apa itu Print in VBA Excel?

VBA Printout tidak ada apa-apanya, tapi seperti biasa cara kita mencetak di worksheet biasa tidak ada perbedaan dalam hal ini. Dengan menggunakan kode Excel VBA, kita dapat mencetak seluruh data lembar kerja. Kami dapat mencetak buku kerja, bagan, rentang tertentu, dll.

Setelah semua kerja keras yang kami lakukan untuk menyajikan laporan kepada manajer, kami biasanya mengirim email. Namun dalam beberapa kasus dalam rapat, manajer Anda memerlukan salinan cetak laporan Anda. Dalam skenario tersebut, Anda perlu mencetak laporan yang Anda miliki di spreadsheet. Salah satu alasan manajer Anda membutuhkan laporan yang dicetak bisa menjadi laporan yang sangat besar untuk dibaca di komputer. Di lembar kerja, Anda pasti sudah terbiasa mencetak laporan. Pada artikel ini, kami akan menunjukkan cara mencetak menggunakan pengkodean VBA. Ikuti artikel ini selama 15 menit berikutnya untuk mempelajari cara mencetak laporan di VBA.

Sintaks PrintOut VBA di VBA Excel

Sebelum kita melihat sintaksnya, izinkan saya mengklarifikasi ini terlebih dahulu. Apa yang kami cetak? Kami mencetak rentang, bagan, lembar kerja, buku kerja. Jadi metode PrintOut () tersedia dengan semua tujuan ini.

(Dari): Dari halaman mana pencetakan harus dimulai. Jika kami tidak memberikan nilai apa pun, itu akan diperlakukan seperti dari halaman pertama.

(Kepada): Apa yang harus menjadi halaman terakhir yang akan dicetak? Jika diabaikan, ini akan mencetak hingga halaman terakhir.

(Salinan): Berapa banyak salinan yang perlu Anda cetak.

(Pratinjau): Apakah Anda ingin melihat pratinjau cetak sebelum melanjutkan untuk mencetak. Jika ya, maka TRUE adalah argumennya, jika bukan FALSE, adalah argumennya.

Contoh Cetak di VBA Excel

Berikut adalah contoh Print in VBA Excel.

Untuk keperluan ilustrasi, saya telah membuat data dummy, seperti yang ditunjukkan pada gambar di bawah ini.

Sekarang kita perlu mencetak laporan dari A1 hingga D14. Ini jangkauan saya. Masukkan rentang dalam kode VBA untuk mengakses metode PrintOut.

Kode:

Sub Print_Example1 () Range ("A1: D14") End Sub

Sekarang akses metode PrintOut.

Kode:

Sub Print_Example1 () Range ("A1: D14"). PrintOut End Sub

Saya tidak menyentuh parameter apa pun. Ini cukup untuk mencetak kisaran yang dipilih. Jika saya menjalankan kode ini, itu akan mencetak kisaran dari sel A1 hingga D14.

Parameter Metode Printout di VBA Excel

Sekarang saya telah menyalin dan menempelkan data yang sama untuk menggunakan parameter lain dari metode PrintOut di VBA Excel.

Saat kita ingin mencetak seluruh sheet, kita bisa merujuk ke seluruh sheet sebagai Active Sheet. Ini akan menutupi seluruh lembaran di dalamnya.

  • Kode untuk Mencetak Seluruh Lembar Kerja.

Kode:

Sub Print_Example1 () ActiveSheet.UsedRange.PrintOut 'Ini akan mencetak seluruh rentang lembar yang digunakan. Akhiri Sub
  • Kode untuk Merujuk Nama Lembar .

Kode:

Sub Print_Example1 () Sheets ("Ex 1"). UsedRange.PrintOut 'Ini juga akan mencetak seluruh rentang sheet yang digunakan yang disebut Ex 1. End Sub
  • Code to Print all the Worksheets in the Workbook.

Code:

Sub Print_Example1() Worksheets.UsedRange.PrintOut 'This will also print the entire used range of all the sheet in the workbook. End Sub
  • Code to Print the Entire Workbook Data.

Code:

Sub Print_Example1() ThisWorkbook.UsedRange.PrintOut 'This will also print the entire used range of all the sheet in the workbook. End Sub
  • Code to Print Only the Selected Area.

Code:

Sub Print_Example1() Selection.PrintOut 'This will print only the selected range End Sub

How to use the Parameters of Print Out Method in Excel VBA?

Now we will see how to use the parameters of the print out method. As I told, I had expanded the data to use other properties.

For sure, this is not going to print in a single sheet. Select the range as A1 to S29.

Code:

Sub Print_Example2() Range ("A1:S29") End Sub

Now select the print out method.

Code:

Sub Print_Example2() Range("A1:S29").PrintOut End Sub

The first & second parameters are From & To, what is the starting & ending pages position. By default, it will print all the pages, so I don’t touch this part. Now I want to see the print preview, so I will choose Preview as TRUE.

Code:

Sub Print_Example2() Range("A1:S29").PrintOut Preview:=True End Sub

Now I will run this code. We will see the print preview.

This is coming in 2 pages.

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 () Dengan Lembar Kerja ("Contoh 1"). PageSetup .Zoom = False .FitToPagesTall = 2 .FitToPagesWide = 1 .Orientation = xlLandscape Akhiri Dengan ActiveSheet.PrintOut Preview: = True End Sub

Ini akan menyiapkan halaman untuk dicetak dalam satu lembar serta mencetak dalam mode lanskap. Sekarang pratinjau cetaknya akan seperti ini.

Seperti ini, kita dapat menggunakan metode cetak VBA untuk mencetak hal-hal yang ingin kita cetak dan bermain-main dengannya.

Artikel yang menarik...