Bagaimana cara mengubah komentar menjadi catatan kaki atau catatan akhir di Microsoft Word?
Penulis: Siluvia Terakhir Dimodifikasi: 2024-08-29
Misalkan ada banyak komentar di dokumen Word Anda, bagaimana Anda dapat mengubah semua komentar ini menjadi catatan kaki atau catatan akhir pada saat yang bersamaan? Artikel ini memberikan metode VBA untuk mencapainya.
Ubah komentar menjadi catatan kaki atau catatan akhir dengan kode VBA
Ubah komentar menjadi catatan kaki atau catatan akhir dengan kode VBA
Kode VBA di bawah ini dapat membantu Anda dengan cepat mengubah semua komentar dalam dokumen saat ini menjadi catatan kaki atau catatan akhir. Silakan lakukan sebagai berikut.
1. Buka dokumen berisi komentar yang akan Anda ubah menjadi catatan kaki atau catatan akhir, tekan lain + F11 kunci untuk membuka Microsoft Visual Basic untuk Aplikasi jendela.
2. Dalam Microsoft Visual Basic untuk Aplikasi window, klik Menyisipkan > Modul. Kemudian salin kode VBA di bawah ini ke jendela Modul.
Kode VBA: Ubah komentar menjadi catatan kaki:
Sub ConvertCommentsToFootnotes()
Dim xComm As Comment
Dim xCommRange As Range
Dim xDoc As Document
Application.ScreenUpdating = False
Set xDoc = ActiveDocument
For Each xComm In xDoc.Comments
Set xCommRange = xComm.Range
xDoc.Footnotes.Add xComm.Scope, , xCommRange.Text
xComm.Delete
Next
Application.ScreenUpdating = True
End Sub
Kode VBA: Ubah komentar menjadi catatan akhir:
Sub ConvertCommentsToEndnotes()
Dim xComm As Comment
Dim xCommRange As Range
Dim xDoc As Document
Application.ScreenUpdating = False
Set xDoc = ActiveDocument
For Each xComm In xDoc.Comments
Set xCommRange = xComm.Range
xDoc.Endnotes.Add xComm.Scope, , xCommRange.Text
xComm.Delete
Next
Application.ScreenUpdating = True
End Sub
3. tekan F5 kunci untuk menjalankan kode.
Kemudian semua komentar dalam dokumen saat ini diubah menjadi catatan kaki atau catatan akhir segera berdasarkan kode VBA yang Anda terapkan.
Artikel terkait:
Lakukan Lebih Banyak dalam Waktu Lebih Sedikit dengan Kutools for Word yang Ditingkatkan AI
Kutools for Word bukan hanya seperangkat alat - ini adalah solusi cerdas yang dirancang untuk meningkatkan produktivitas Anda. Dengan kemampuan berbasis AI dan fitur paling penting, Kutools membantu Anda mencapai lebih banyak hal dalam waktu lebih singkat:
- Hasilkan konten yang sesuai dengan kebutuhan Anda.
- Ubah tulisan Anda dengan lebih dari 20 gaya penulisan, pastikan tulisan Anda sempurna.
- Ringkas dokumen Anda dalam satu klik.
- Terjemahkan konten Anda ke lebih dari 40 bahasa dengan mudah, perluas jangkauan Anda secara global.
- Terima bantuan dan informasi instan tentang dokumen Anda.
- Tanyakan tentang pemrosesan dokumen, dan jika Kutools memiliki alat tersebut, Asisten AI akan segera menjalankan tugas Anda sesuai perintah Anda, memberikan kekuatan penuh Word di ujung jari Anda.
- Ajukan pertanyaan apa pun tanpa meninggalkan Word - terintegrasi dengan sempurna, Asisten AI selalu dalam jangkauan.
- Hasilkan, tulis ulang, rangkum, dan terjemahkan konten dengan klik.
- Terima bantuan dan informasi instan tentang dokumen Anda.
- Tanyakan tentang pemrosesan dokumen, dan Asisten AI akan menyajikan alat yang tepat dan melaksanakan tugas, atau memandu Anda melalui langkah-langkahnya.
- Ajukan pertanyaan apa pun tanpa meninggalkan Word - terintegrasi dengan sempurna, Asisten AI selalu dalam jangkauan.
Pelajari lebih lanjut tentang Kutools untuk Word Unduh Sekarang
Alat Produktivitas Kantor Terbaik
Kutools for Word - 100+ Alat untuk Word
