Petua: Bahasa lain diterjemahkan Google. Anda boleh melawat English versi pautan ini.
Log masuk
x
or
x
x
Daftar Sekarang
x

or

Bagaimana untuk mengecualikan lembaran kerja tertentu semasa mencetak buku kerja?

Sekiranya anda mempunyai buku kerja yang mengandungi pelbagai lembaran kerja yang perlu dicetak tetapi tidak termasuk yang khusus, adakah terdapat kaedah yang cepat dan mudah bagi kami untuk mencetak semua helaian kecuali satu dalam Excel?

Kecualikan lembaran kerja tertentu semasa mencetak buku kerja dengan kod VBA


anak panah gelembung kanan biru Kecualikan lembaran kerja tertentu semasa mencetak buku kerja dengan kod VBA

Untuk mencetak keseluruhan buku kerja kecuali satu lembaran kerja tertentu, kod VBA berikut boleh membantu anda.

1. Tahan ALT + F11 kunci untuk membuka Microsoft Visual Basic untuk Aplikasi tingkap.

2. Klik Memasukkan > Modul, dan tampal kod berikut dalam Tetingkap Modul.

Kod VBA: Kecualikan lembaran kerja tertentu semasa mencetak buku kerja:

Private Sub Printexclude()
'Updateby Extendoffcie 20161206
    Dim ws As Worksheet
    Dim strShName As String
    On Error Resume Next
    strShName = Application.InputBox("Enter the sheet name you want to exclude:", _
    "Kutools For Excel", , , , , , 2)
    Application.ScreenUpdating = False
    For Each ws In ThisWorkbook.Worksheets
        If ((ws.Visible = xlSheetVisible) And _
         (ws.Name <> strShName)) Then ws.PrintOut
    Next ws
    Application.ScreenUpdating = True
End Sub

3. Kemudian tekan F5 kunci untuk menjalankan kod ini, dan kotak petanda muncul untuk mengingatkan anda memasukkan nama lembaran yang ingin dikecualikan ketika mencetak buku kerja, lihat tangkapan layar:

cetak doc tidak termasuk lembaran 1

4. Kemudian klik OK butang, dan lembaran kerja lain akan dicetak sekali gus mengecualikan helaian khusus yang anda perlukan.


Cadangan Alat Produktiviti untuk Excel

kte tab 201905

Kutools untuk Excel Membantu Anda Selalu Menyelesaikan Kerja di Hadapan Masa, dan Berdiri Daripada Orang

  • Lebih daripada ciri-ciri canggih 300 yang canggih, yang direka untuk senario kerja 1500, meningkatkan produktiviti oleh 70%, memberi anda lebih banyak masa untuk menjaga keluarga dan menikmati kehidupan.
  • Tidak perlu lagi menghafal formula dan kod VBA, berikan rehat dari otak anda sekarang.
  • Menjadi pakar Excel dalam minit 3, Operasi yang rumit dan berulang boleh dilakukan dalam beberapa saat,
  • Mengurangkan beribu-ribu operasi papan kekunci & tetikus setiap hari, mengucapkan selamat tinggal kepada penyakit pekerjaan sekarang.
  • 110,000 orang yang sangat berkesan dan pilihan syarikat 300 + yang terkenal di dunia.
  • Ciri-ciri penuh 60-hari adalah percubaan percuma. Jaminan wang balik 60 hari. Tahun 2 peningkatan dan sokongan percuma.

Membawa Browsing Tab dan Editing ke Microsoft Office, Jauh Lebih Berkuasa Daripada Tab Penyemak Imbas

  • Tab Pejabat direka untuk Aplikasi Pejabat Word, Excel, PowerPoint dan Lain-lain: Penerbit, Akses, Visio dan Projek.
  • Buka dan buat beberapa dokumen dalam tab baharu pada tetingkap yang sama, dan bukannya dalam tetingkap baru.
  • Meningkatkan produktiviti anda oleh 50%, dan mengurangkan beratus-ratus klik tetikus untuk anda setiap hari!
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.

Be the first to comment.