Note: The other languages of the website are Google-translated. Back to English

Bagaimana cara mengukur kotak komentar secara otomatis agar sesuai dengan isinya di Excel?

Saat Anda menyisipkan komentar ke sel, ukuran kotak komentar adalah defaultnya. Jika Anda memasukkan banyak konten ke dalamnya, beberapa konten tidak akan langsung terlihat. Apakah mungkin untuk menyesuaikan ukuran kotak komentar dengan isinya secara otomatis?

Ukuran otomatis kotak komentar agar sesuai dengan isinya di lembar kerja
Ukuran otomatis kotak komentar agar sesuai dengan kontennya dalam rentang sel
Dengan mudah mengubah ukuran kotak komentar agar sesuai dengan isinya di lembar aktif atau semua lembar dengan alat yang luar biasa


Ukuran otomatis kotak komentar agar sesuai dengan isinya di lembar kerja

Di Excel, Anda dapat menyeret kotak komentar ke ukuran kebutuhan Anda secara manual satu per satu, tetapi jika ada banyak kotak komentar yang perlu diubah ukurannya, cara ini akan membosankan dan menyita waktu. Dalam kasus ini, Anda dapat menerapkan kode VBA berikut.

1. Tahan ALT + F11 kunci, dan itu membuka Jendela Microsoft Visual Basic for Applications.

2. klik Menyisipkan > Modul, dan tempelkan makro berikut di file Jendela modul.

Kode VBA: Ukuran otomatis kotak komentar di lembar kerja

Sub FitComments()
'Updateby20140325
Dim xComment As Comment
For Each xComment In Application.ActiveSheet.Comments
    xComment.Shape.TextFrame.AutoSize = True
Next
End Sub

3. Kemudian tekan F5 kunci untuk menjalankan kode ini, dan semua kotak komentar di lembar kerja aktif telah diubah ukurannya agar sesuai dengan isinya seperti gambar berikut yang ditampilkan:

doc mengubah ukuran otomatis komentar1

jenis: Kode ini hanya berfungsi di lembar kerja saat ini, dan tidak dapat secara otomatis mengubah ukuran kotak komentar baru yang Anda tambahkan.


Satu klik untuk menyesuaikan ukuran kotak komentar dengan kontennya secara otomatis di Excel dengan cepat:

The Komentar Paskan Otomatis kegunaan Kutools untuk Excel dapat membantu dengan cepat menyesuaikan ukuran kotak komentar dengan isinya secara otomatis di lembar kerja seperti yang ditunjukkan demo di bawah ini. Unduh dan coba sekarang! (30- jalur bebas hari)


Ukuran otomatis kotak komentar agar sesuai dengan kontennya dalam rentang sel

Jika Anda hanya perlu mengubah ukuran kotak komentar sel secara otomatis, Anda dapat menggunakan kode VBA berikut.

1. Tahan ALT + F11 kunci, dan itu membuka Jendela Microsoft Visual Basic for Applications.

2. klik Menyisipkan > Modul, dan tempelkan makro berikut di file Jendela modul.

Kode VBA: Ukuran otomatis kotak komentar dalam rentang sel

Sub Fitrangecomments()
'Updateby20140325
Dim rng As Range
Dim WorkRng As Range
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
For Each rng In WorkRng
    If Not rng.Comment Is Nothing Then
        rng.Comment.Shape.TextFrame.AutoSize = True
    End If
Next
End Sub

3. Kemudian tekan F5 kunci untuk mengeksekusi kode ini, dan kotak prompt akan muncul untuk mengingatkan Anda memilih berbagai sel yang ingin Anda ubah ukuran kotak komentar, lihat tangkapan layar:

doc-resize-comment-box3

4. Dan kemudian klik OK, kotak komentar sel yang Anda pilih telah dipasang secara otomatis ke konten komentar.

jenis: Kode ini tidak dapat secara otomatis mengubah ukuran kotak komentar baru yang Anda tambahkan.


Ukuran otomatis kotak komentar agar sesuai dengan isinya di lembar aktif atau semua lembar 

Anda bisa mencoba Komentar Paskan Otomatis kegunaan Kutools untuk Excel untuk secara otomatis mengubah ukuran all kotak komentar di lembar aktif atau semua lembar di Excel. Silakan lakukan sebagai berikut.

Sebelum melamar Kutools untuk Excel, Mohon unduh dan instal terlebih dahulu.

1. Untuk mengubah ukuran kotak komentar secara otomatis agar sesuai dengan isinya di lembar aktif, silakan klik Kutools > More > Komentar Paskan Otomatis > Lembar aktif.

Dan jika Anda ingin mengubah ukuran otomatis semua kotak komentar di seluruh workbook, klik Kutools > More > Komentar Paskan Otomatis > Semua lembar. Lihat tangkapan layar:

Kemudian semua kotak komentar secara otomatis diubah ukurannya agar sesuai dengan isinya. Lihat tangkapan layar:

Catatan:

  • 1. Setelah mengubah ukuran kotak komentar secara otomatis, saat mengedit komentar lagi, kotak komentar secara otomatis akan meluas atau menyusut dengan konten.
  • 2. Untuk komentar baru yang Anda sisipkan, Anda perlu mengaktifkan utilitas komentar Paskan Otomatis ini lagi untuk mengubah ukuran semua kotak komentar baru yang dimasukkan.

  Jika Anda ingin memiliki uji coba gratis (30-day) dari utilitas ini, silahkan klik untuk mendownloadnya, lalu lanjutkan untuk menerapkan operasi sesuai langkah di atas.


Dengan mudah mengubah ukuran kotak komentar agar sesuai dengan isinya


Artikel terkait:


Alat Produktivitas Kantor Terbaik

Kutools for Excel Memecahkan Sebagian Besar Masalah Anda, dan Meningkatkan Produktivitas Anda hingga 80%

  • Reuse: Masukkan dengan cepat rumus, bagan yang kompleks dan apa pun yang pernah Anda gunakan sebelumnya; Enkripsi Sel dengan kata sandi; Buat Milis dan mengirim email ...
  • Bilah Formula Super (dengan mudah mengedit beberapa baris teks dan rumus); Membaca Tata Letak (membaca dan mengedit sel dalam jumlah besar dengan mudah); Tempel ke Rentang yang Difilter...
  • Gabungkan Sel / Baris / Kolom tanpa kehilangan Data; Pisahkan Konten Sel; Gabungkan Baris / Kolom Duplikat... Mencegah Sel Duplikat; Bandingkan Rentang...
  • Pilih Duplikat atau Unik Baris; Pilih Baris Kosong (semua sel kosong); Temukan Super dan Temukan Fuzzy di Banyak Buku Kerja; Pilih Acak ...
  • Salinan Tepat Beberapa Sel tanpa mengubah referensi rumus; Buat Referensi Otomatis ke Beberapa Lembar; Sisipkan Poin, Kotak Centang, dan lainnya ...
  • Ekstrak Teks, Tambahkan Teks, Hapus berdasarkan Posisi, Hapus Space; Membuat dan Mencetak Subtotal Paging; Konversi Konten Antar Sel dan Komentar...
  • Filter Super (simpan dan terapkan skema filter ke sheet lain); Penyortiran Lanjutan menurut bulan / minggu / hari, frekuensi dan lainnya; Filter Khusus dengan huruf tebal, miring ...
  • Gabungkan Workbooks dan WorkSheets; Gabungkan Tabel berdasarkan kolom kunci; Pisahkan Data menjadi Beberapa Lembar; Konversi Batch xls, xlsx dan PDF...
  • Lebih dari 300 fitur canggih. Mendukung Office / Excel 2007-2021 dan 365. Mendukung semua bahasa. Penerapan yang mudah di perusahaan atau organisasi Anda. Fitur lengkap Uji coba gratis 30 hari. Jaminan uang kembali 60 hari.
tab kte 201905

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!
officetab bawah
Urutkan komentar berdasarkan
komentar (18)
Belum ada peringkat. Jadilah yang pertama memberi peringkat!
Komentar ini diminimalkan oleh moderator di situs
Terimakasih. Solusi mudah dan cepat untuk masalah saya.
Komentar ini diminimalkan oleh moderator di situs
Menggunakan kode Anda 1. Dim xComment Sebagai Komentar Untuk Setiap xComment Di Application.ActiveSheet.Comments xComment.Shape.TextFrame.AutoSize = True Next 2. masalah dengan kesalahan ini terjadi 445 objek referensi Dengan Range("A1").Comment.Shape. TextFrame2 .WordWrap = msoTrue .AutoSize = msoAutoSizeTextToFitShape Diakhiri Dengan
Komentar ini diminimalkan oleh moderator di situs
Itu tidak berfungsi seperti kode pertama yang Anda kirim hanya sesuai dengan konten yang saya inginkan adalah sesuatu yang akan membuat semuanya sama lebar dan panjangnya akan otomatis sesuai dengan konten karena ini adalah tampilan kolom H sekarang dan kolom A bervariasi ukuran lebar ingin kolom A menjadi tiga kolom lebar dan panjang agar sesuai dengan konten dan tumbuh sesuai kebutuhan ketika Anda menekan enter panjang kotak harus bertambah dengan garis apakah ada kode untuk itu? perhatikan saya mencoba kedua kode kunci halaman yang Anda kirim terakhir.
Komentar ini diminimalkan oleh moderator di situs
ini tidak berhasil sama sekali. Saya mendapat kesalahan berulang kali.
Komentar ini diminimalkan oleh moderator di situs
Saya mendapatkan kesalahan: Run-time '1004': Metode Ukuran Otomatis objek TextFrame gagal
Komentar ini diminimalkan oleh moderator di situs
"Kode VBA: Kotak komentar ukuran otomatis di lembar kerja" menangani komentar spreadsheet saya. Terima kasih banyak!
Komentar ini diminimalkan oleh moderator di situs
Bagus! Memecahkan masalah saya.
Komentar ini diminimalkan oleh moderator di situs
Ini benar-benar info yang bagus dan bermanfaat. Saya senang Anda membagikan informasi bermanfaat ini kepada kami. Harap tetap up to date seperti ini. Terima kasih telah berbagi. kdagekebeceddded
Komentar ini diminimalkan oleh moderator di situs
Sementara kode berfungsi, itu membuat kotak setinggi satu baris yang berarti bahwa komentar besar menghilang di luar halaman di suatu tempat. Bisakah Anda memberikan kode untuk memperbaiki lebar setiap kotak (misalnya tiga lebar kolom standar Excel) dan menyesuaikan panjang kotak secara otomatis agar sesuai dengan teks? Terima kasih.
Komentar ini diminimalkan oleh moderator di situs
Terima kasih banyak. Ini benar-benar menyelamatkan saya dari banyak kerepotan.
Komentar ini diminimalkan oleh moderator di situs
@DENNIE "Sementara kode berfungsi, itu membuat kotak satu baris tinggi yang berarti bahwa komentar besar menghilang di luar halaman di suatu tempat. Bisakah Anda memberikan kode untuk memperbaiki lebar setiap kotak (katakanlah tiga lebar kolom Excel standar) dan penyesuaian otomatis panjang kotak agar sesuai dengan teks? Terima kasih." // Sepakat
Komentar ini diminimalkan oleh moderator di situs
Terima kasih banyak telah berbagi ini. Sangat membantu!
Komentar ini diminimalkan oleh moderator di situs
Apakah ada cara untuk membuat garis dari kotak komentar ke sel lebih gelap atau lebih gemuk?
Komentar ini diminimalkan oleh moderator di situs
Hai Demondrew,
Maaf dapat membantu Anda untuk itu.
Komentar ini diminimalkan oleh moderator di situs
Saya kira Crystal membuat kami keluar jalur pertanyaannya adalah: Apakah ada cara untuk membuat garis dari kotak komentar ke sel lebih gelap atau lebih gemuk? Itu akan menjadi garis yang mengelilingi kotak komentar. TIA DD
Komentar ini diminimalkan oleh moderator di situs
luar biasa! terima kasih, cara pertama berhasil! menyelamatkan saya jam kerja!
Komentar ini diminimalkan oleh moderator di situs
Tidak berfungsi, modul sisipan tidak muncul
Komentar ini diminimalkan oleh moderator di situs
Bom-dia,

Salvou de mais! Segera setelah itu ada rencana seluler dan komentar untuk ficaram desajustados no pc.
Tinha mais de 10 juta komentar untuk tamanho da caixa! Se tivesse pix eu até pagava! Obrigado.
Belum ada komentar yang diposting di sini
Tinggalkan komentar anda
Posting sebagai Tamu
×
Beri peringkat pos ini:
0   Karakter
Lokasi yang Disarankan

Ikuti kami

Hak Cipta © 2009 - www.extendoffice.com. | Seluruh hak cipta. Dipersembahkan oleh ExtendOffice. | Peta Situs
Microsoft dan logo Office adalah merek dagang atau merek dagang terdaftar dari Microsoft Corporation di Amerika Serikat dan / atau negara lain.
Dilindungi oleh Sectigo SSL