Loncat ke daftar isi utama

Bagaimana cara mengubah komentar menjadi konten sel di Excel?

Misalkan saya memiliki rentang sel yang diisi dengan komentar di lembar kerja, dan sekarang, saya ingin mengonversi semua komentar ke konten sel sehingga saya dapat mencetaknya dengan rapi dan bulat. Apakah ada cara yang baik untuk menyelesaikan tugas ini?

Ubah komentar menjadi konten sel dengan fungsi Buatan Pengguna

Ubah komentar menjadi konten sel dengan kode VBA

Ubah komentar menjadi konten sel dengan Kutools for Excel


panah gelembung kanan biru Ubah komentar menjadi konten sel dengan fungsi Buatan Pengguna

Dengan menggunakan metode ini, Anda perlu membuat fungsi yang ditentukan terlebih dahulu, lalu menerapkan rumus yang ditentukan untuk mengonversi komentar menjadi konten sel. Anda dapat menyelesaikannya dengan langkah-langkah berikut:

1.Klik Pengembang > Visual Basic, Baru Microsoft Visual Basic untuk aplikasi jendela akan ditampilkan, klik Menyisipkan > Modul, dan masukkan fungsi berikut ke dalam Modul:

Fungsi GetComments (pRng As Range) Sebagai String 'Updateby20140509 If Not pRng.Comment Is Nothing Then GetComments = pRng.Comment.Text End If End Function

2.Tekan Ctrl + S untuk menyimpan fungsinya.

3Kemudian masukan rumus berikut “= GetComments (A1)”Di sel kosong mana pun, dalam hal ini, saya akan menggunakan sel E1. Lihat tangkapan layar:

doc-komentar-ke-sel1

4. Tap Enter kunci. Dan pilih sel E1, lalu seret gagang isian ke atas rentang sel yang ingin Anda isi dengan rumus ini. Dan semua komentar diubah menjadi konten sel. Lihat tangkapan layar:

doc-komentar-ke-sel2


panah gelembung kanan biru Ubah komentar menjadi konten sel dengan kode VBA

Jika Anda mengetahui kode VBA, kode singkat berikut juga dapat membantu Anda mengonversi komentar menjadi konten sel.

1. Pilih rentang yang ingin Anda ubah menjadi konten sel;

2. Klik Pengembang > Visual Basic, Baru Microsoft Visual Basic untuk aplikasi jendela akan ditampilkan, klik Menyisipkan > Modul, dan masukkan kode berikut ke dalam Modul:

Sub CommentToCell()
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
For Each Rng In WorkRng
    Rng.Value = Rng.NoteText
Next
End Sub

3. Lalu klik  doc-perkalian-kalkulasi-3 tombol untuk menjalankan kode. Dan pilih rentang yang ingin Anda konversi lalu klik OK, dan semua komentar yang dipilih telah dikonversi ke konten sel di sel yang relevan.


doc-komentar-ke-sel3 -2 doc-komentar-ke-sel4

Note: Jika Anda tidak menginginkan komentar, Anda dapat menghapusnya.


panah gelembung kanan biru Ubah komentar menjadi konten sel dengan Kutools for Excel

Kutools untuk Excel : dengan lebih dari 300 add-in Excel yang praktis, gratis untuk dicoba tanpa batasan dalam 30 hari.Dapatkan Sekarang .

Grafik Konversi Komentar dan Sel of Kutools untuk Excel adalah alat yang berguna dan berguna dapat membantu Anda memecahkan banyak masalah tentang komentar.

Setelah menginstal Kutools untuk Excel, lakukan hal berikut:

1. Pilih rentang yang ingin Anda impor komentar ke dalam sel.

2. Klik Kutools > More > Konversi Komentar dan Sel, lihat tangkapan layar:

doc-komentar-ke-sel-5

3. di Konversi Komentar dan Sel kotak dialog, pilih Ubah komentar menjadi konten sel. Lihat tangkapan layar:

doc-komentar-ke-sel-6

4. Lalu klik OK. Sekarang semua komentar yang dipilih diubah ke konten sel dalam kisaran aslinya.

Untuk informasi lebih rinci tentang Konversi Komentar dan Sel, Silakan kunjungi Konversi deskripsi fitur Komentar dan Sel.


Artikel terkait:

Alat Produktivitas Kantor Terbaik

🤖 Kutools AI Ajudan: Merevolusi analisis data berdasarkan: Eksekusi Cerdas   |  Hasilkan Kode  |  Buat Rumus Khusus  |  Analisis Data dan Hasilkan Grafik  |  Aktifkan Fungsi Kutools...
Fitur Populer: Temukan, Sorot, atau Identifikasi Duplikat   |  Hapus Baris Kosong   |  Gabungkan Kolom atau Sel tanpa Kehilangan Data   |   Putaran tanpa Formula ...
Pencarian Super: VLookup Beberapa Kriteria    VLookup Nilai Berganda  |   VLookup di Beberapa Lembar   |   Pencarian Fuzzy ....
Daftar Drop-down Lanjutan: Buat Daftar Drop Down dengan Cepat   |  Daftar Drop Down yang Bergantung   |  Multi-pilih Drop Down List ....
Manajer Kolom: Tambahkan Jumlah Kolom Tertentu  |  Pindahkan Kolom  |  Alihkan Status Visibilitas Kolom Tersembunyi  |  Bandingkan Rentang & Kolom ...
Fitur Unggulan: Fokus Kisi   |  Tampilan Desain   |   Bar Formula Besar    Manajer Buku Kerja & Lembar   |  Perpustakaan Sumberdaya (Teks otomatis)   |  Pemetik tanggal   |  Gabungkan Lembar Kerja   |  Enkripsi/Dekripsi Sel    Kirim Email berdasarkan Daftar   |  Filter Super   |   Filter Khusus (filter tebal/miring/coret...) ...
15 Perangkat Teratas12 Teks Tools (Tambahkan Teks, Hapus Karakter, ...)   |   50 + Grafik jenis (Gantt Chart, ...)   |   40+ Praktis Rumus (Hitung usia berdasarkan ulang tahun, ...)   |   19 Insersi Tools (Masukkan Kode QR, Sisipkan Gambar dari Jalur, ...)   |   12 Konversi Tools (Angka ke Kata, Konversi Mata Uang, ...)   |   7 Gabungkan & Pisahkan Tools (Lanjutan Gabungkan Baris, Pisahkan Sel, ...)   |   ... dan banyak lagi

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...

Deskripsi Produk


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!
Comments (24)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Hi, The first function in a module does the job only once: when I write or drag the formula down. If I go back to change any of the comment it does not update the destination cell with the new comment. For example let's say I have a comment in A1, then when I place the formula in cell B1, it will show me the A1's comment only the first time. If I go back and change the A1 comment, the cell B1 does not get updated. I tried "Calculate Now" or F9 and nothing happens. I saved the file and opened again and nothing, cell B1 stays with the old comment. It is like the function is dead. Now, if I enter or change anything in the cell A1 itself (not the comment), like adding an space in the end, it will immediately update the comment. I'm using Office 2019 Pro.
This comment was minimized by the moderator on the site
thanks very musch
This comment was minimized by the moderator on the site
great site
This comment was minimized by the moderator on the site
is there a way to do this without the title of a comment or the non bold writing?
This comment was minimized by the moderator on the site
Great tip, thanks for sharing!
This comment was minimized by the moderator on the site
Perfect! Thank You
This comment was minimized by the moderator on the site
You are a star!!! thanks
This comment was minimized by the moderator on the site
It does not automatically update when I change the comment. How do I change this? Thanks
This comment was minimized by the moderator on the site
Same problem here. Changing the comment does not trigger the calculations. Forcing the calculation (F9) does not work. Saving and load the file does not work. However, changing a cell content will trigger the calculations.
This comment was minimized by the moderator on the site
You are my HERO!!!!!!!!!!!!!!!!!!!!!! Thank You Thank You Thank You
This comment was minimized by the moderator on the site
Hi. I tried this code and it worked right. But I have a little problem: can I use this code combined with VLOOKUP? I tried but I didn't get anything. If you can help me, I'll be thankful. I'm brazilian. If I wrote something wrong, I apologise. Thanks!
There are no comments posted here yet
Load More
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations