Bagaimana mengubah semua catatan akhir menjadi teks biasa di Word
Ubah catatan akhir menjadi teks akan memudahkan Anda untuk mengedit atau menghapusnya. Misalnya, jika Anda ingin memilih catatan akhir dengan teks biasa lainnya sekaligus, Word tidak mengizinkan Anda melakukannya. Bagaimana Anda bisa menyelesaikannya dengan mudah? Tutorial ini akan menunjukkan beberapa metode untuk mengubah catatan akhir menjadi teks biasa.
Ubah catatan akhir menjadi teks secara manual
Ubah catatan akhir menjadi teks dengan VBA
Ubah catatan akhir menjadi teks dengan Kutools for Word
Ubah catatan akhir menjadi teks secara manual
1. Letakkan kursor di tempat catatan akhir berada, kemudian tekan Ctrl + A untuk memilih semua catatan akhir dari dokumen. Lihat tangkapan layar:
2. tekan Ctrl + C untuk menyalin catatan akhir.
3. tekan Ctrl + End untuk memindahkan kursor ke akhir seluruh dokumen dan sebelum catatan akhir.
4. tekan Ctrl + V untuk menempelkan catatan akhir ke akhir dokumen. Urutan catatan akhir akan tetap utuh, tetapi catatan akhir yang ditempelkan berubah. Lihat tangkapan layar:
5. Gantilah semua nomor 1 sebelum teks dengan daftar nomor asli secara manual.
Ubah catatan akhir menjadi teks dengan VBA
Singkatnya, Anda juga dapat mengubah catatan akhir menjadi teks biasa dengan kode VBA.
1: Tekan Alt + F11 untuk membuka a Jendela Microsoft Visual Basic for Applications;
2: Klik Modul dari Menyisipkan tab, salin dan tempel kode VBA berikut ke file Modul jendela;
3: Klik Run tombol atau tekan F5 untuk menerapkan VBA.
VBA yang mengubah catatan akhir menjadi teks:
Sub convertendnote()
Dim aendnote As Endnote
For Each aendnote In ActiveDocument.Endnotes
ActiveDocument.Range.InsertAfter vbCr & aendnote.Index _
& vbTab & aendnote.Range
aendnote.Reference.InsertBefore "a" & aendnote.Index & "a"
Next aendnote
For Each aendnote In ActiveDocument.Endnotes
aendnote.Reference.Delete
Next aendnote
Selection.Find.ClearFormatting
Selection.Find.Replacement.ClearFormatting
With Selection.Find.Replacement.Font
.Superscript=True
End With
With Selection.Find
.Text="(a)([0-9]{1,})(a)"
.Replacement.Text="\2"
.Forward=True
.Wrap=wdFindContinue
.Format=True
.MatchWildcards=True
End With
Selection.Find.Execute Replace:=wdReplaceAll
End Sub
Catatan: Anda dapat mengubah awal dan akhir makro agar sesuai dengan keinginan Anda.
Ubah catatan akhir menjadi teks dengan Kutools for Word
Untuk tangan-tangan baru komputer itu, VBA terlalu rumit untuk ditangani. Tetapi dengan Kutools for Word terpasang, Anda dapat dengan cepat mengubah semua catatan akhir menjadi teks Convert Endnotes to Text utilitas dengan satu klik.
Setelah menginstal Kutools for Word, lakukan seperti di bawah ini:
1. Harap terapkan utilitas ini dengan mengklik Kutools > mengubah > Convert Endnotes to Text. Lihat tangkapan layar:
2. Setelah mengklik Convert Endnotes to Text, Anda akan melihat hasilnya seperti gambar di bawah ini:
Demo: Ubah semua catatan akhir menjadi teks dengan cepat di Word
Artikel terkait:
Alat Produktivitas Kantor Terbaik
Kutools for Word - Tingkatkan Pengalaman Kata Anda dengan Over 100 Fitur Luar Biasa!
π€ Fitur AI Kutools: Hasilkan Konten / Menulis Ulang Teks / Tanya Jawab Dokumen / Dapatkan Jawaban Cepat / Terjemahkan dokumen / Dokumen Polandia (Format Pertahankan)...
π Penguasaan Dokumen: Halaman Terpisah / Gabungkan Dokumen / Ekspor Pilihan dalam Berbagai Format (PDF/TXT/DOC/HTML...) / Konversi Batch ke PDF...
β Pengeditan Isi: Temukan dan Ganti Batch di Beberapa File / Ubah Ukuran Semua Gambar / Ubah Urutan Baris dan Kolom Tabel / Ubah Tabel menjadi Teks...
🧹 Bersih dengan Mudah: Menyapu Spasi Ekstra / Bagian Istirahat / Teks box / Hyperlink / Untuk alat penghapus lainnya, kunjungi Hapus kelompok...
β Sisipan Kreatif: Memasukkan Seribu Pemisah / Kotak Centang / Tombol Radio / Kode QR / barcode / Banyak Gambar / Temukan lebih lanjut di Menyisipkan kelompok...
π Pilihan Presisi: Tepat Halaman Tertentu / Meja / bentuk / Paragraf Judul / Tingkatkan navigasi dengan lebih Pilih fitur...
β Peningkatan Bintang: Navigasi ke Lokasi Mana Pun / Sisipkan Otomatis Teks Berulang / Beralih Antar Jendela Dokumen / 11 Konversi Tools...
Alat Produktivitas Kantor Terbaik
Kutools for Word - 100+ Alat untuk Word
- π€ Fitur AI Kutools: Menghasilkan, Menulis kembali, Meringkaskan, Menterjemahkan Dokumen / Dapatkan Jawaban Cepat / Dokumen Polandia (Format Pertahankan)
- π Penguasaan Dokumen: Halaman Terpisah / Gabungkan Dokumen / Konversi Batch ke PDF
- β Pengeditan Isi: Temukan dan Ganti Batch / Ubah Ukuran Semua Gambar
- 🧹 Bersih dengan Mudah: Hapus Spasi Ekstra / Hapus Bagian Breaks
- β Sisipan Kreatif: Masukkan Seribu Pemisah / Sisipkan Kotak Centang / Buat Kode QR