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 ada apa-apa, tetapi seperti biasa, bagaimana kita mencetak di lembaran kerja biasa tidak ada perbezaan dalam hal ini. Dengan menggunakan kod Excel VBA, kita dapat mencetak keseluruhan data lembaran kerja. Kita boleh 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 mesyuarat, pengurus anda memerlukan salinan laporan anda. Dalam senario tersebut, anda perlu mencetak laporan yang anda ada di hamparan. Salah satu sebab pengurus anda memerlukan cetakan daripada 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? Kami mencetak julat, carta, lembaran kerja, buku kerja. Oleh itu kaedah PrintOut () tersedia dengan semua objektif ini.
(Dari): Dari halaman pencetakan mana yang harus dimulakan. Sekiranya kita tidak memberikan sebarang nilai, ia akan dianggap seperti dari halaman pertama.
(Kepada): Apakah halaman terakhir yang perlu dicetak? Sekiranya tidak diendahkan, 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.
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 julat 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 Print_Example1 () 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 di VBA Excel.
Apabila kita mahu 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 terpakai 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 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 Lembaran Kerja ("Contoh 1"). PageSetup .Zoom = False .FitToPagesTall = 2 .FitToPagesWide = 1 .Orientation = xlLandscape End With ActiveSheet.PrintOut Preview: = True End Sub
Ini akan menetapkan halaman untuk dicetak dalam satu helaian dan juga mencetak dalam mod landskap. Sekarang pratonton cetak akan seperti ini.
Seperti ini, kita dapat menggunakan kaedah mencetak VBA untuk mencetak barang yang ingin kita cetak dan bermain dengannya.
