and the VBA didnt work as well
Bagaimana menghapus semua kotak teks di Word?
Kotak teks menawarkan pengguna cara mudah untuk memblokir blok teks dalam dokumen. Tapi bagaimana cara menghapusnya saat Anda memformat sebuah dokumen. Tutorial ini akan menunjukkan beberapa cara untuk menyingkirkan semua kotak teks dari dokumen Word.
Hapus semua kotak teks secara manual satu demi satu
Hapus semua kotak teks dengan kode VBA
Mudah menghapus semua kotak teks tanpa menghapus teks dengan Kutools for Word
Mudah menghapus semua kotak teks dengan atau tanpa menghapus teks dari dokumen Word:
Dengan Hapus Semua Kotak Teks utilitas dari Kutools for Word, Anda dapat dengan cepat menghapus semua kotak teks dari dokumen saat ini dengan atau tanpa konten teks mereka seperti screenshot di bawah ini yang ditampilkan:
Kutools for Word: dengan lebih dari 100 handy Word add-ins, gratis untuk dicoba tanpa batasan dalam 30 hari. Download dan uji coba gratis Sekarang!
Office Tab: Aktifkan Tabed Editing dan Browsing di Office, Sama seperti Chrome, Firefox, IE 8 / 9 / 10.
Classic Menu for Office: Bawa Tampilan Lama Kantor 2003 Kembali ke Office 2007, 2010, 2013, 2016, dan 2019.
Hapus semua kotak teks secara manual satu demi satu
Jika hanya ada satu atau dua kotak teks yang ingin Anda hapus, Anda dapat melakukan hal berikut:
Langkah 1: Klik di dalam kotak teks dan tekan Ctrl + C untuk menyalin teks (lewati langkah ini jika Anda tidak ingin menyimpan teksnya).
Langkah 2: Klik batas kotak teks, tekan Menghapus.
Langkah 3: Ulangi langkah 1 dan langkah 2 sampai semua kotak teks yang tidak diinginkan dihapus.
Hapus semua kotak teks dengan kode VBA
Meskipun ada banyak kotak teks yang ingin Anda hapus, dan Anda juga tidak ingin menyimpan teks di dalamnya, kode VBA akan sangat membantu. Harap gunakan kode VBA untuk menghapus semua kotak teks dalam dokumen sebagai berikut:
1. tekan Alt + F11 membuka jendela VBA di Word;
2. klik Modul in Menyisipkan tab, dan masukkan kode VBA ke dalamnya Modul jendela;
3. klik menjalankan tombol untuk menerapkan kode VBA (atau tekan F5);
Kode VBA untuk menghapus semua kotak teks tanpa menyimpan teks:
Sub Test() Dim oShp As Word.Shape Dim i As Long For i = ActiveDocument.Shapes.Count To 1 Step -1 Set oShp = ActiveDocument.Shapes(i) If oShp.Type = msoTextBox Then oShp.Delete End If Next i End Sub
Catatan: Kode VBA ini hanya bisa menghapus kotak teks gambar.
Mudah menghapus semua kotak teks dengan Kutools untuk Word
Anda dapat menghapus semua kotak teks namun menyimpan isinya atau menghapus kedua kotak teks beserta isinya dalam dokumen Kutools for Word.
Kutools for Word : Dengan lebih dari 100 add-in Word yang praktis, bebas untuk mencoba tanpa batasan dalam 30 hari.
1. Harap terapkan utilitas ini dengan mengklik Kutools > Lebih > Hapus Semua Kotak Teks. Lihat tangkapan layar
2. Jika Anda hanya ingin menghapus kotak teks dan menyimpan teksnya, silakan cek Hapus teks saja kotak, dan simpan teksnya pilihan dalam Hapus Semua Kotak Teks dialog, lalu klik OK. Jika Anda ingin menghapus kedua kotak teks dan teksnya, tolong hapus centang.
3. Kemudian kotak dialog muncul untuk memberi tahu Anda berapa banyak kotak teks yang berhasil dihapus, silakan klik tombol OK.
Kemudian Anda dapat melihat semua kotak teks dengan atau tanpa konten dihapus dari dokumen. Lihat tangkapan layar:
jenis: Setelah menghapus kotak teks dari dokumen, baris kosong mungkin muncul. Maka itu Hapus Tanda Paragraf Kosong utilitas dari Kutools for Word dapat membantu Anda menghapus semua baris kosong dari dokumen pada saat yang bersamaan. Silakan klik Kutools > Emty Paras > Hapus Tanda Paragraf Kosong. Lihat tangkapan layar
Kemudian semua baris kosong dihapus dari dokumen saat ini secara otomatis pada saat yang bersamaan:
Jika Anda ingin mencoba percobaan gratis ini, silakan pergi ke download software gratis pertama, dan kemudian pergi untuk menerapkan operasi sesuai langkah di atas.
Demo: Mudah menghapus semua kotak teks tanpa menghapus teks dengan Kutools for Word
Kutools for Word mencakup lebih dari 100 fitur dan alat canggih untuk Microsoft Word. Gratis untuk mencoba tanpa batasan dalam 30 hari. Download uji coba gratis sekarang juga!
Kutools for Word
Lebih dari 100 Fungsi Tingkat Lanjut untuk Word 2003, 2007, 2010, 2013, 2016, dan 2019
Fitur Lebih | Free download | Hanya $ 39.00 untuk ratusan fungsi