Bagaimana cara mengubah ukuran font balon komentar di dokumen Word?
Seperti gambar di bawah ini, jika Anda ingin memperbesar ukuran font balon komentar di dokumen Word, apa yang dapat Anda lakukan? Artikel ini akan menunjukkan kepada Anda dua metode untuk mengatasi masalah ini.
Ubah ukuran font balon komentar dengan fungsi bawaan di Word
Ubah ukuran font balon komentar dengan kode VBA
Ubah ukuran font balon komentar dengan fungsi bawaan di Word
Anda dapat langsung mengubah ukuran font teks balon di panel Semua Gaya di Word. Silakan lakukan sebagai berikut.
1. tekan Ctrl + lain + perubahan + S kunci untuk membuka Gaya pane
2. Dalam Gaya pane, klik Opsi. Lihat tangkapan layar:
3. Dalam pembukaan Opsi Panel Gaya jendela, pilih Semua gaya dari Pilih gaya untuk ditampilkan daftar drop-down
4. Lalu klik OK untuk kembali ke Gaya panel, gulir ke bawah untuk menemukan Teks Balon baris, klik tombol untuk memperluas daftar drop-down, lalu klik memodifikasi. Lihat tangkapan layar:
5. Dalam Ubah Gaya jendela, pilih ukuran font yang Anda butuhkan di format bagian seperti gambar di bawah ini yang ditampilkan, dan kemudian klik OK .
6. Tutup Gaya pane
Kemudian ukuran font dari semua balon komentar diubah ke yang ditentukan.
Note: Setelan ini akan berlaku untuk semua komentar di masa mendatang.
Ubah ukuran font balon komentar dengan kode VBA
Bagian ini akan memperkenalkan kode VBA untuk membantu Anda dengan mudah mengubah ukuran font balon komentar di dokumen Word.
1. Dalam dokumen Anda akan mengubah ukuran font balon komentar, tekan lain + F11 kunci untuk membuka Microsoft Visual Basic untuk Aplikasi jendela.
2. Di jendela, klik Menyisipkan > Modul. Kemudian salin kode VBA di bawah ini ke jendela Modul.
Kode VBA: ubah ukuran font balon komentar di Word
Sub SetCommentTextStyle()
'Updated by ExtendOffice 20181112
Dim objComment As Comment
Dim objDoc As Document
Dim strFontName As String
Dim strFontSize As String
Set objDoc = ActiveDocument
strFontName = InputBox("Enter text font name here: ", "Font name")
strFontSize = InputBox("Enter font size here: ", "Font size")
With objDoc
For Each objComment In .Comments
objComment.Range.Font.Name = strFontName
objComment.Range.Style = ActiveDocument.Styles("Balloon Text Char")
Next objComment
End With
ActiveDocument.Styles("Balloon Text").Font.Size = Val(strFontSize)
End Sub
3. tekan F5 kunci untuk menjalankan kode.
4. Yang pertama Kutools for Word kotak dialog, masukkan font baru untuk komentar Anda dan klik OK.
5. Di kedua Kutools for Word kotak dialog, ketik ukuran font yang Anda butuhkan dan klik OK.
Kemudian ukuran font dari semua balon komentar diubah ke yang ditentukan dalam dokumen saat ini.
Alat Produktivitas Kantor Terbaik
Kutools for Word - Tingkatkan Pengalaman Kata Anda dengan Over 100 Fitur Luar Biasa!
🤖 Asisten AI Kutools: Ubah tulisan Anda dengan AI - Hasilkan Konten / Menulis Ulang Teks / Meringkas Dokumen / Menanyakan Informasi berdasarkan Dokumen, semuanya dalam Word
📘 Penguasaan Dokumen: Halaman Terpisah / Gabungkan Dokumen / Ekspor Pilihan dalam Berbagai Format (PDF/TXT/DOC/HTML...) / Konversi Batch ke PDF / Ekspor Halaman sebagai Gambar / Cetak Banyak File sekaligus...
✏ Pengeditan Isi: Temukan dan Ganti Batch di Banyak File / Ubah Ukuran Semua Gambar / Ubah Urutan Baris dan Kolom Tabel / Ubah Tabel menjadi Teks...
🧹 Bersih dengan Mudah: Menyapu Spasi Ekstra / Bagian Istirahat / Semua Header / Teks box / Hyperlink / Untuk alat penghapus lainnya, kunjungi kami Hapus Grup...
➕ Sisipan Kreatif: Memasukkan Seribu Pemisah / Kotak Centang / Tombol Radio / Kode QR / barcode / Tabel Garis Diagonal / Keterangan Persamaan / Keterangan gambar / Keterangan Tabel / Banyak Gambar / Temukan lebih lanjut di Sisipkan Grup...
🔍 Pilihan Presisi: Tepat halaman tertentu / tabel / bentuk / paragraf judul / Tingkatkan navigasi dengan lebih Pilih fitur...
⭐ Peningkatan Bintang: Navigasi dengan cepat ke lokasi mana pun / menyisipkan teks berulang secara otomatis / beralih antar jendela dokumen dengan mulus / 11 Alat Konversi...