Dapatkah Anda mencetak semua tab di excel sekaligus?

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

1. Pilih Cetak dari menu File. Excel menampilkan kotak dialog Cetak
2. Di area Cetak Apa dari kotak dialog, pilih opsi Keseluruhan Buku Kerja
3. Klik tombol Properti. Excel menampilkan kotak dialog Properties untuk printer, dengan tab Layout dipilih
4. Atur kontrol Pages Per Sheet ke 4
5. Klik OK untuk menutup kotak dialog Properti
6. 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 Sub

Setelah 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

Bagaimana cara mencetak semua tab di Excel?

Bisakah Anda mencetak banyak tab di Excel sekaligus?

Apakah ada cara untuk mencetak semua tab sekaligus?

Bagaimana Anda mencetak semua tab pada satu halaman di Excel?