Note: The other languages of the website are Google-translated. Back to English

Bagaimana cara menghapus beberapa halaman tertentu dalam dokumen Word?

Di dokumen Word, Anda dapat memilih konten halaman saat ini, lalu tekan tombol Delete untuk menghapus halaman saat ini dengan mudah. Tetapi, jika Anda perlu menghapus banyak halaman dari file Word yang besar, bagaimana Anda bisa menyelesaikannya dengan cepat?

Hapus berbagai halaman di dokumen Word dengan fitur Go To

Hapus beberapa halaman tertentu di dokumen Word dengan kode VBA


Hapus berbagai halaman di dokumen Word dengan fitur Go To

Jika Anda ingin menghapus serangkaian halaman berturut-turut dari dokumen Word, fitur Go To dapat membantu Anda.

1. Luncurkan dokumen Word yang ingin Anda hapus halamannya.

2. Lalu tekan F5 kunci untuk membuka Cari dan Ganti kotak dialog, di bawah pergi Untuk tab, klik Halaman dalam Pergi ke mana daftar kotak, lalu masukkan nomor halaman awal yang ingin Anda hapus, dan tekan Enter kunci untuk pergi ke halaman tertentu, lihat tangkapan layar:

doc hapus banyak halaman 1

2. Lalu, tutup ini Cari dan Ganti kotak dialog, dan tekan F8 untuk menyalakan Mode perpanjang.

3. Terus menekan F5 kunci untuk membuka Cari dan Ganti dialog, kali ini, masukkan nomor halaman akhir yang ingin Anda hapus, lalu tekan Enter kunci. Semua halaman dari 15 hingga 20 telah dipilih sekaligus. Lihat tangkapan layar:

doc hapus banyak halaman 2

4. Akhirnya, tekan Delete kunci langsung untuk menghapus halaman ini sekaligus.


Hapus beberapa halaman tertentu di dokumen Word dengan kode VBA

Untuk menghapus beberapa halaman tertentu dalam file Word yang tidak berurutan, kode VBA berikut dapat membantu Anda.

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

2. Klik Menyisipkan > Modul, dan tempel kode berikut di Module Window.

Kode VBA: Hapus beberapa halaman tertentu di file Word:

Sub DeletePagesInDoc()
    Dim xRange As Range
    Dim xPage As String
    Dim xDoc As Document
    Dim xArr
    Dim I, xSplitCount As Long
    Application.ScreenUpdating = False
    Set xDoc = ActiveDocument
    xPage = InputBox("Enter the page numbers of pages to be deleted: " & vbNewLine & _
            "use comma to separate numbers", "KuTools for Word", "")
    xArr = Split(xPage, ",")
    xPageCount = UBound(xArr)
    For I = xPageCount To 0 Step -1
        Selection.GoTo wdGoToPage, wdGoToAbsolute, xArr(I)
        xDoc.Bookmarks("\Page").Range.Delete
    Next
    Application.ScreenUpdating = True
End Sub

3. Lalu tekan F5 kunci untuk menjalankan kode ini, dan kotak prompt muncul untuk mengingatkan Anda memasukkan nomor halaman yang ingin Anda hapus, pisahkan nomor halaman dengan koma, lihat tangkapan layar:

doc hapus banyak halaman 3

4. Dan kemudian, klik OK tombol, semua halaman yang Anda tentukan telah dihapus sekaligus.


Pilih beberapa halaman tertentu lalu hapus sekaligus:

Jika Anda ingin menghapus beberapa halaman spesifik dari dokumen Word yang besar, Kutools for Word's Pilih Halaman fitur ini dapat membantu Anda memilih halaman mana saja yang Anda butuhkan, lalu tekan Delete kunci untuk menghapusnya sekaligus.

doc hapus banyak halaman 4

Kutools for Word: dengan lebih dari 100 add-in Word yang praktis, gratis untuk dicoba tanpa batasan dalam 60 hari. Klik untuk Mengunduh dan uji coba gratis Sekarang!


Alat Produktivitas Kata yang Direkomendasikan

 

Kutools For Word - Lebih dari 100 Fitur Canggih Untuk Word, Hemat 50% Waktu Anda

  • Pengoperasian yang rumit dan berulang dapat dilakukan satu kali pemrosesan dalam hitungan detik.
  • Sisipkan beberapa gambar di seluruh folder ke dalam dokumen Word sekaligus.
  • Gabungkan dan gabungkan beberapa file Word di seluruh folder menjadi satu dengan urutan yang Anda inginkan.
  • Pisahkan dokumen saat ini menjadi dokumen terpisah sesuai dengan judul, hentian bagian, atau kriteria lainnya.
  • Konversikan file antara Doc dan Docx, Docx dan PDF, kumpulan alat untuk konversi dan pemilihan umum, dan seterusnya ...
Urutkan komentar berdasarkan
komentar (3)
Belum ada peringkat. Jadilah yang pertama memberi peringkat!
Komentar ini diminimalkan oleh moderator di situs
Terima kasih atas solusi yang sangat membantu!!!!!!!!!!!
Komentar ini diminimalkan oleh moderator di situs
terima kasih. dari mana Anda belajar vba
Komentar ini diminimalkan oleh moderator di situs
Ciao, invece per eliminare "rapidamente" di un documento di svariate pagine (sekitar 100) più fogli vuoti non consecuti possibile?
Esiste un procedimento per eliminare i fogli vuoti, senza doverli andre a ricercare.

Terima kasih.
Belum ada komentar yang diposting di sini
Tinggalkan komentar anda
Posting sebagai Tamu
×
Beri peringkat pos ini:
0   Karakter
Lokasi yang Disarankan

Ikuti kami

Hak Cipta © 2009 - www.extendoffice.com. | Seluruh hak cipta. Dipersembahkan oleh ExtendOffice. | Peta Situs
Microsoft dan logo Office adalah merek dagang atau merek dagang terdaftar dari Microsoft Corporation di Amerika Serikat dan / atau negara lain.
Dilindungi oleh Sectigo SSL