Bagaimana cara mengekspor komentar dari Excel ke Word?
Untuk pengguna Excel, memasukkan komentar ke dalam sel adalah tugas umum, terkadang, Anda perlu menyalin dan menempelkan komentar ini ke dokumen Word untuk beberapa tujuan. Tentu saja, Anda dapat menyalin dan menempelkan komentar ke Word satu per satu, tetapi ini adalah pekerjaan yang membosankan dan memakan waktu. Apakah ada cara untuk mengekspor semua komentar dari Excel ke Word sekaligus?
Ekspor komentar dari lembar kerja saat ini ke Word dengan kode VBA
Ekspor komentar dari lembar kerja saat ini ke Word dengan kode VBA
Sayangnya, Excel tidak menyediakan fitur untuk menyalin dan menempel semua komentar ke Word sekaligus. Namun, dengan kode VBA berikut, Anda bisa dengan cepat mengekspor semua komentar lembar kerja aktif ke dokumen Word.
1. Tahan ALT + F11 kunci untuk membuka Jendela Microsoft Visual Basic for Applications.
2. Klik Menyisipkan > Modul, dan tempel kode berikut di Jendela Modul.
Kode VBA: Ekspor komentar dari lembar kerja saat ini ke Word
Sub CopyCommentsToWord()
'Update 20140325
Dim xComment As Comment
Dim wApp As Object
On Error Resume Next
Set wApp = GetObject(, "Word.Application")
If Err.Number <> 0 Then
Err.Clear
Set wApp = CreateObject("Word.Application")
End If
wApp.Visible = True
wApp.Documents.Add DocumentType:=0
For Each xComment In Application.ActiveSheet.Comments
wApp.Selection.TypeText xComment.Parent.Address & vbTab & xComment.Text
wApp.Selection.TypeParagraph
Next
Set wApp = Nothing
End Sub
3. Lalu tekan F5 kunci untuk menjalankan kode ini, dan semua komentar di lembar kerja aktif telah diekspor ke dokumen Word baru dengan alamat selnya. Lihat tangkapan layar:
Artikel terkait:
Bagaimana cara cepat memasukkan komentar ke banyak sel di Excel?
Bagaimana cara mengubah bentuk kotak komentar di Excel?
Bagaimana cara mengubah semua format komentar dalam sel di Excel?
Bagaimana cara mengubah nama penulis semua komentar di Excel?
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!