Bagaimana cara membersihkan area cetak melalui beberapa lembar sekaligus di Excel?
Dalam beberapa kasus, kami mungkin mengatur area cetak di lembar kerja untuk dicetak, tetapi jika ada beberapa lembar dengan area cetak berbeda, bagaimana cara menghapus semua area cetak melalui beberapa lembar sekaligus di Excel? Menghapus secara manual satu per satu memang lambat, adakah cara cepat?
Kosongkan area cetak melalui seluruh buku kerja dengan VBA
Kosongkan area cetak melalui beberapa lembar dengan Copy Page Setup
Kosongkan area cetak melalui seluruh buku kerja dengan VBA
Berikut adalah kode makro yang bisa menghapus semua area cetak melalui seluruh buku kerja.
1. tekan Alt + F11 kunci untuk mengaktifkan Microsoft Visual Basic untuk Aplikasi jendela.
2. Dalam Proyek - VBAProject panel, klik dua kali Buku Kerja Ini dan salin di bawah VBA dan tempelkan ke skrip kosong kanan. Lihat tangkapan layar:
VBA: Hapus area cetak seluruh buku kerja
Sub ClearPrintArea()
'UpdatebyExtendoffice20171229
Dim xSheet As Worksheet
For Each xSheet In Worksheets
xSheet.PageSetup.PrintArea = ""
Next
End Sub
3. tekan F5 kunci untuk menjalankan kode, maka semua area cetak di buku kerja telah dihapus.
Kosongkan area cetak melalui beberapa lembar dengan Copy Page Setup
Jika Anda memiliki Kutools untuk Excel, itu Salin Pengaturan Halaman utilitas juga dapat membantu Anda membersihkan beberapa area cetak melalui lembaran.
Setelah menginstal Kutools for Excel, lakukan seperti di bawah ini:(Unduh Gratis Kutools untuk Excel Sekarang!)
1. Pilih satu lembar, misalnya lembar kata sandi acak, lalu klik Page Layout > Print area > Kosongkan Area Cetak. Lihat tangkapan layar:
2. Lalu klik Kutools Ditambah > Pencetakan > Salin Pengaturan Halaman.
3. Kemudian di Salin Pengaturan Halaman dialog,
dalam Salin ke bagian, semua lembar kecuali lembar saat ini sudah terdaftar, harap centang lembar yang ingin Anda hapus area pencetakannya;
lalu pergi ke Opsi bagian, di bawah lembar daftar, periksa Area cetak pilihan saja. Lihat tangkapan layar:
4. klik Ok. Sekarang area cetak dihapus dari lembar yang dipilih.
Demo
Alat Produktivitas Kantor Terbaik
Tingkatkan Keterampilan Excel Anda dengan Kutools for Excel, dan Rasakan Efisiensi yang Belum Pernah Ada Sebelumnya. Kutools for Excel Menawarkan Lebih dari 300 Fitur Lanjutan untuk Meningkatkan Produktivitas dan Menghemat Waktu. Klik Di Sini untuk Mendapatkan Fitur yang Paling Anda Butuhkan...
Tab Office Membawa antarmuka Tab ke Office, dan Membuat Pekerjaan Anda Jauh Lebih Mudah
- Aktifkan pengeditan dan pembacaan tab di Word, Excel, PowerPoint, Publisher, Access, Visio, dan Project.
- Buka dan buat banyak dokumen di tab baru di jendela yang sama, bukan di jendela baru.
- Meningkatkan produktivitas Anda sebesar 50%, dan mengurangi ratusan klik mouse untuk Anda setiap hari!