Buku kerja bisa berisi semua jenis data. Jika Anda memiliki buku kerja yang menyertakan sejumlah lembar kerja, masing-masing hanya berisi sejumlah kecil data, Anda mungkin bertanya-tanya apakah ada cara untuk mencetak beberapa lembar kerja pada satu lembar kertas.
Ada beberapa cara yang dapat Anda lakukan untuk mendekati solusi untuk masalah ini. Yang pertama cukup cetak beberapa halaman per lembar, menggunakan kemampuan driver printer Anda. Misalnya, saya memiliki HP LaserJet lama, dan driver printer memungkinkan saya untuk menentukan jumlah halaman yang akan dicetak per lembar kertas. Jika saya ingin mencetak tiga atau empat lembar kerja satu halaman dalam satu lembar kertas, yang perlu saya lakukan hanyalah mengikuti langkah-langkah ini
- Pilih Cetak dari menu File. Excel menampilkan kotak dialog Cetak
- Di area Cetak Apa dari kotak dialog, pilih opsi Keseluruhan Buku Kerja
- Klik tombol Properti. Excel menampilkan kotak dialog Properties untuk printer, dengan tab Layout dipilih
- Atur kontrol Pages Per Sheet ke 4
- Klik OK untuk menutup kotak dialog Properti
- Klik OK untuk benar-benar mencetak lembar kerja
Printer Anda mungkin menawarkan kemampuan serupa dengan apa yang diuraikan di sini, tetapi Anda mungkin perlu menjelajahi kotak dialog Properti printer untuk menemukan kemampuan itu. Tentu saja, pencetakan dengan cara ini dapat menghasilkan teks yang sangat kecil pada hasil cetak, karena driver printer hanya mengurangi setiap halaman untuk memenuhi area yang proporsional dari halaman yang dicetak. Jika Anda ingin mengurangi sebagian ruang putih, dan dengan demikian memperbesar ukuran teks yang dicetak, Anda perlu mencari solusi lain
Banyak orang, untuk mengonsolidasikan apa yang dicetak, sebenarnya membuat "lembar kerja pencetakan" yang berisi referensi ke area yang akan dicetak pada lembar kerja lain di buku kerja. Referensi ini dapat dilakukan melalui rumus yang mengacu pada data di setiap lembar kerja, atau dengan menggunakan alat kamera di Excel. (Alat kamera telah dijelaskan dalam edisi lain dari ExcelTips. )
Untuk solusi otomatis menggabungkan beberapa lembar kerja menjadi satu lembar kerja, Anda bisa menggunakan makro. Makro berikut akan membuat lembar kerja baru di akhir buku kerja Anda dan menyalin konten dari semua lembar kerja lain ke dalamnya
Sub PrintOnePage() Dim wshTemp As Worksheet, wsh As Worksheet Dim rngArr() As Range, c As Range Dim i As Integer Dim j As Integer ReDim rngArr(1 To 1) For Each wsh In ActiveWorkbook.Worksheets i = i + 1 If i > 1 Then ' resize array ReDim Preserve rngArr(1 To i) End If On Error Resume Next Set c = wsh.Cells.SpecialCells(xlCellTypeLastCell) If Err = 0 Then On Error GoTo 0 'Prevent empty rows Do While Application.CountA(c.EntireRow) = 0 _ And c.EntireRow.Row > 1 Set c = c.Offset(-1, 0) Loop Set rngArr(i) = wsh.Range(wsh.Range("A1"), c) End If Next wsh 'Add temp.Worksheet Set wshTemp = Sheets.Add(after:=Worksheets(Worksheets.Count)) On Error Resume Next With wshTemp For i = 1 To UBound(rngArr) If i = 1 Then Set c = .Range("A1") Else Set c = _ ActiveSheet.Cells.SpecialCells(xlCellTypeLastCell) Set c = c.Offset(2, 0).End(xlToLeft) 'Skip one row End If 'Copy-paste range (prevent empty range) If Application.CountA(rngArr(i)) > 0 Then rngArr(i).Copy c End If Next i End With On Error GoTo 0 Application.CutCopyMode = False ' prevent marquies With ActiveSheet.PageSetup 'Fit to 1 page .Zoom = False .FitToPagesWide = 1 .FitToPagesTall = 1 End With 'Preview New Sheet ActiveWindow.SelectedSheets.PrintPreview 'Print Desired Number of Copies i = InputBox("Print how many copies?", "ExcelTips", 1) If IsNumeric(i) Then If i > 0 Then ActiveSheet.PrintOut Copies:=i End If End If 'Delete temp.Worksheet? If MsgBox("Delete the temporary worksheet?", _ vbYesNo, "ExcelTips") = vbYes Then Application.DisplayAlerts = False wshTemp.Delete Application.DisplayAlerts = True End If End SubSetelah lembar kerja gabungan disatukan, makro menampilkan lembar kerja menggunakan Pratinjau Cetak. Saat Anda menutup Pratinjau Cetak, ia menanyakan berapa banyak salinan lembar kerja yang ingin Anda cetak. Jika Anda memasukkan angka yang lebih besar dari nol, maka banyak salinan yang dicetak. Terakhir, makro menawarkan untuk menghapus lembar kerja gabungan untuk Anda sebelum selesai
Microsoft Excel memungkinkan kita untuk mencetak data sesuai keinginan kita. Ada begitu banyak pilihan yang tersedia saat mencetak beberapa lembar sekaligus di excel. . Pada artikel ini, kami akan mendemonstrasikan cara mencetak banyak lembar di Excel
Daftar isi
Download Buku Latihan
Anda dapat mengunduh buku kerja dan berlatih dengannya
Cetak Beberapa Lembar. xlsm
7 Metode Berbeda untuk Mencetak Beberapa Lembar di Excel
Excel memiliki fitur bawaan yang dapat digunakan untuk mencetak seluruh buku kerja secara bersamaan. Banyak sekali cara kita bisa mencetak excel berlembar-lembar. Jadi, mari kita lihat semua cara berbeda untuk mencetak banyak lembar di excel
1. Cetak Semua Lembar Sekaligus di Excel
1. 1. Cetak Semua Lembar Sekaligus
Misalkan, kami memiliki empat lembar di buku kerja kami dan kami ingin mencetak semua lembar sekaligus. Untuk mencetak semua lembar sekaligus. Cukup ikuti langkah-langkah di bawah ini
LANGKAH
- Pertama, buka tab File di pita atau tekan Ctrl + P. Ini akan membawa kita ke menu utama
- Setelah itu, klik opsi Cetak
- Selanjutnya, dari opsi Print, buka menu drop-down Print Settings, lalu pilih Print Entire Workbook
- Setelah itu tinggal klik tombol Print
- Dan, begitulah
Dengan mengikuti petunjuk ini, Anda dapat mencetak seluruh buku kerja hanya dalam sekali jalan
1. 2. VBA untuk Mencetak Seluruh Buku Kerja
Kita bisa menggunakan VBA Macro untuk mencetak seluruh buku kerja sekaligus. Untuk ini, kita perlu mengikuti prosedur ke bawah
LANGKAH
- Pertama, buka tab Pengembang di pita
- Kedua, klik Visual Basic untuk membuka Editor Visual Basic tempat kita akan menulis kode VBA
- Cara lain untuk membuka Editor Visual Basic adalah dengan menekan Alt + F11
- Atau, alih-alih membuka editor dari tab Pengembang, Anda dapat mengeklik lembar apa pun di spreadsheet, lalu mengeklik kanan. Pilih opsi Lihat Kode
- Dan, ini akan membuka Editor Visual Basic
- Selanjutnya, pergi ke Insert dan pilih Module dari menu drop-down
Saran. Kode tidak dapat ditulis pada sheet manapun. Anda harus memasukkan Modul untuk membuat kode karena kami akan menggunakannya di seluruh spreadsheet, bukan hanya satu lembar. Saat kita perlu menulis kode untuk sheet tertentu, kita dapat menggunakan sheet tersebut untuk melakukannya.
- Setelah itu, salin dan tempel kode VBA di bawah ini
Kode VBA
Sub Print_Workbooks() ActiveWorkbook.PrintOut End Sub_- Selanjutnya, tekan tombol F5 atau klik tombol Run Sub untuk menjalankan kode
- Terakhir, dengan menjalankan kode, kita dapat dengan mudah mencetak seluruh buku kerja
1. 3. Cetak Banyak Lembar Menggunakan VBA
Kami juga dapat mencetak banyak lembar menggunakan VBA Macros
LANGKAH
- Pada awalnya, begitu juga dengan cara sebelumnya, untuk membuka Visual Basic Editor, terlebih dahulu masuk ke tab Developer pada ribbon
- Klik pada Visual Basic atau tekan Alt + F11 untuk membuka Editor Visual Basic
- Cara lain untuk membuka Editor Visual Basic adalah, cukup klik kanan pada lembar apa pun dan pilih Lihat Kode
- Selanjutnya, pergi ke Insert dan pilih Module dari menu drop-down
- Sekarang, tuliskan Kode VBA di bawah ini
Kode VBA
Sub Print_Multiple() Worksheets(Array("Cars", "Furniture")).PrintOut End Sub- Terakhir, Jalankan kode dengan mengklik tombol Jalankan Sub, di sisi lain, tekan tombol pintas keyboard F5 untuk menjalankan kode
- Pada akhirnya, menjalankan kode akan mencetak beberapa lembar secara bersamaan
Baca Selengkapnya. Cetak Beberapa Lembar Excel ke Satu File PDF dengan VBA (6 Kriteria)
2. Pencetakan Beberapa Lembar Aktif
2. 1. Cetak Lembar Aktif
Asumsikan bahwa, kami memiliki empat lembar data tetapi hanya ada dua lembar aktif dan kami hanya ingin mencetak lembar aktif itu bersama-sama. Untuk melakukan ini, mari kita tunjukkan langkah-langkahnya
LANGKAH
- Pertama, pilih semua lembar yang ingin kita cetak. Untuk melakukannya, tahan tombol Ctrl dan pilih satu lembar sekaligus
- Kedua, buka tab File di pita atau tekan Ctrl + P
- Setelah itu, klik opsi Cetak
- Selanjutnya, dari opsi Cetak, buka menu drop-down Pengaturan cetak, lalu pilih Cetak Lembar Aktif
- Dan terakhir, klik Cetak
2. 2. VBA untuk Mencetak hanya Lembar Aktif
Dengan menggunakan Excel VBA Macros, kita dapat mencetak lembar aktif dari buku kerja kita. Untuk melakukannya, ikuti langkah-langkah di bawah ini
LANGKAH
- Pertama, buka tab Pengembang di pita
- Kedua, klik Visual Basic atau tekan Alt + F11
- Atau, kita cukup klik kanan pada sheet dan pilih View Code
- Ini akan membuka Editor Visual Basic
- Pergi ke Insert dan pilih Module dari menu drop-down
- Sekarang, tuliskan Kode VBA
Kode VBA
Sub Print_ActiveSheets() ActiveSheet.PrintOut End Sub- Selanjutnya, jalankan kode dengan menekan F5 atau klik tombol Run Sub
Ini akan mencetak semua lembar aktif di spreadsheet
Baca Selengkapnya. Cara Mencetak Lembar Bentang Excel di Banyak Halaman (3 Cara)
3. Mencetak Area Cetak Tertentu pada Banyak Lembar
3. 1. Menyesuaikan Area Cetak Secara Manual
Misalkan, kita memiliki beberapa lembar spreadsheet, tetapi ingin mencetak area tertentu dari setiap buku kerja. Kita dapat melakukannya hanya dengan mengikuti prosedur di bawah ini
LANGKAH
- Pertama-tama, pilih sel yang ingin kita cetak untuk setiap lembar
- Kedua, buka tab Tata Letak Halaman di pita
- Selanjutnya, klik menu drop-down Print Area di bawah grup Page Setup
- Setelah itu, klik Set Print Area
- Dan itu saja. Ini hanya akan memberikan hasil cetak untuk area tertentu yang dipilih
3. 2. Menggunakan VBA untuk Mengatur Area Cetak
VBA juga dapat membantu mencetak area yang dipilih. Untuk menggunakan Macro VBA ikuti langkah-langkah ke bawah
LANGKAH
- Dengan cara yang sama, buka tab Pengembang di pita. Kemudian, klik Visual Basic
- Klik kanan pada lembar, lalu pilih Lihat Kode
- Ini akan membawa Anda ke bidang Editor Visual Basic, tempat kami dapat menulis VBA Macro
- Sekarang, buka Insert dan pilih Module dari menu drop-down
- Di sini, tuliskan Kode VBA di bawah ini
Kode VBA
Sub Print_Multiple() Dim PMultiple As String Dim ws As Worksheet PrntArea = ActiveSheet.PageSetup.PrintArea For Each ws In Worksheets ws.PageSetup.PrintArea = PMultiple Next Set wks = Nothing End Sub_- Kemudian, jalankan kode dengan mengklik tombol Run Sub atau menggunakan tombol pintasan keyboard F5
- Ini akan mencetak beberapa lembar kerja tetapi hanya area cetak yang dipilih pada setiap lembar
Baca Selengkapnya. Cara Mencetak Area Terpilih di Excel (2 Contoh)
4. VBA untuk Mencetak Beberapa Lembar Excel dalam Satu Halaman
Dengan menggunakan Macro VBA kita dapat mencetak beberapa lembar dalam satu lembar. Cukup ikuti petunjuk di bawah ini
LANGKAH
- Pada awalnya, buka tab Pengembang > Visual Basic > Sisipkan > Modul
- Atau, mengklik kanan lembar kerja akan membuka jendela. Dari sana pergi ke Lihat Kode
- Dan, ini akan membawa Anda ke bidang Editor Visual Basic, tempat kita dapat menulis VBA Macro
- Sebaliknya, menekan Alt + F11 juga akan membuka Editor Visual Basic
- Sekarang, salin dan tempel kode VBA yang ditunjukkan di bawah ini
Kode VBA
Sub Print_Sheets_on_SinglePage() With Worksheets("Cars").PageSetup .Zoom = False .FitToPagesTall = 1 .FitToPagesWide = 1 End With End Sub- Selanjutnya, jalankan kode dengan mengklik tombol Run Sub atau menggunakan tombol shortcut keyboard F5
- Dan terakhir, saat Anda mencetak lembar kerja 'Mobil', printer akan memberi Anda seluruh buku kerja yang dicetak sekaligus
Baca Selengkapnya. Cara Mencetak Lembar di Satu Halaman di Excel (9 Cara Mudah)
Bacaan Serupa
- Cara Mempertahankan Header di Excel Saat Mencetak (3 Cara)
- Cara Menetapkan Baris sebagai Judul Cetak di Excel (4 Metode)
- VBA Excel. Cara Mengatur Print Area Secara Dinamis (7 Cara)
- Cara Mencetak Lembaran Excel Ukuran A4 (4 Cara)
- Cara Tidak Mencetak Sel Kosong di Excel (3 Metode Sederhana)
5. Beberapa Lembar dengan Komentar untuk Dicetak di Excel
Kami dapat mencetak banyak lembar dengan komentar menggunakan VBA Macros. Mari kita lihat prosedur di bawah ini
LANGKAH
- Pertama, buka tab Pengembang dari pita
- Kedua, klik Visual Basic untuk membuka Visual Basic Editor
- Cara lain untuk membuka Editor Visual Basic adalah dengan menekan Alt + F11
- Atau, klik kanan pada lembar, lalu pilih Lihat Kode
- Selanjutnya, pergi ke Insert dan pilih Module dari menu drop-down
- Dan, ini akan membuka Editor Visual Basic
- Setelah itu, salin dan tempel kode VBA
Kode VBA
Sub Print_with_Comnts() Application.DisplayCommentIndicator = xlCommentAndIndicator With ActiveSheet .PageSetup.PrintComments = xlPrintInPlace .PrintOut End With End Sub_- Terakhir, tekan tombol F5 atau klik tombol Jalankan Sub untuk menjalankan kode
- Pada akhirnya, kita bisa melihat hasil yang dibutuhkan
Baca Selengkapnya. Cara Mencetak Lembar Kerja dengan Komentar di Excel (5 Cara Mudah)
6. Cetak Lembar Excel yang Dipilih
Dengan Excel VBA, kita juga bisa mencetak lembar yang dipilih dari buku kerja kita
LANGKAH
- Untuk memulai, klik tab Pengembang di pita
- Kedua, buka Editor Visual Basic dengan mengklik Visual Basic
- Sebagai alternatif, kita dapat mengakses Editor Visual Basic dengan menekan Alt + F11
- Sebaliknya, klik kanan pada lembar dan pilih Lihat Kode dari menu
- Selanjutnya, pilih Modul dari menu tarik-turun di bawah Sisipkan
- Editor Visual Basic akan diluncurkan sebagai hasil dari ini
- Salin dan tempel kode VBA di bawah ini setelah itu untuk melihat hasil akhirnya
Kode VBA
Sub Print_SelectedSheets() ActiveWindow.SelectedSheets.PrintOut End Sub- Terakhir, jalankan kode dengan menekan F5 atau klik tombol Run Sub
Baca Selengkapnya. Cara Mencetak Sel Terpilih di Excel (2 Cara Mudah)
7. Cetak Beberapa Lembar Kerja Tersembunyi
Kadang-kadang, lembar kami dapat disembunyikan dan kami tidak dapat mencetak hanya file-file itu, tetapi dengan Excel VBA ini mudah dilakukan
LANGKAH
- Untuk memulai, gunakan pita untuk menavigasi ke tab Pengembang
- Kedua, buka Visual Basic Editor dengan memilih Visual Basic
- Kita juga bisa masuk ke Visual Basic Editor dengan menekan Alt + F11
- Atau, klik kanan pada lembar dan pilih Lihat Kode
- Kemudian, dari menu tarik-turun Sisipkan, pilih Modul
- Editor Visual Basic kemudian akan terbuka
- Kemudian salin dan tempel kode VBA dari bawah
Kode VBA
Sub Print_Hidden_sheets() Dim Vis As Long Dim sh As Worksheet For Each sh In ActiveWorkbook.Worksheets With sh Vis = .Visible .Visible = xlSheetVisible .PrintOut .Visible = Vis End With Next sh End Sub_- Terakhir, tekan tombol F5 atau klik tombol Jalankan Sub untuk menjalankan kode. Dan kita bisa melihat outputnya
Konten Terkait. Cara Mencetak Lembar Excel Bergaris (3 Cara Mudah)
Kesimpulan
Metode di atas membantu Anda Mencetak Beberapa Lembar di Excel. Semoga ini bisa membantu Anda. Jika Anda memiliki pertanyaan, saran, atau umpan balik, beri tahu kami di bagian komentar. Atau Anda bisa melihat artikel kami yang lain di ExcelDemy. blog com