Cara membungkus teks menggunakan vba (dengan contoh)
Anda bisa menggunakan properti WrapText di VBA untuk membungkus teks dalam sel tertentu di lembar kerja Excel.
Berikut tiga cara umum untuk menggunakan properti ini dalam praktik:
Metode 1: Bungkus teks sel tertentu
Sub UseWrapText()
Range(" B2 ").WrapText = True
End Sub
Metode 2: Bungkus Teks Sel dalam Rentang Tertentu
SubUseWrapText ()
Range(" B2:B11 ").WrapText = True
End Sub
Metode 3: Bungkus teks semua sel di lembar kerja
Sub UseWrapText()
Cells.WrapText = True
End Sub
Contoh berikut memperlihatkan cara menggunakan setiap metode dalam praktik dengan kumpulan data berikut di Excel:
Ayo pergi!
Contoh 1: Bungkus Teks Sel Tertentu Menggunakan VBA
Kita bisa membuat makro berikut untuk membungkus teks di sel B2 saja:
Sub UseWrapText()
Range(" B2 ").WrapText = True
End Sub
Saat kita menjalankan makro ini, kita bisa mengklik sel B2 dan melihat bahwa Bungkus Teks diaktifkan di grup Perataan pada tab Beranda di sepanjang pita atas:
Namun, kita perlu memperpendek panjang kolom B dan menambah tinggi baris 2 agar benar-benar melihat teks yang dibungkus:
Kita sekarang dapat dengan mudah melihat bahwa teks di sel B2 terbungkus sementara teks di semua sel lain di kolom B tidak terbungkus.
Contoh 2: Bungkus Teks Sel dalam Rentang Tertentu Menggunakan VBA
Kita dapat membuat makro berikut untuk membungkus teks di setiap sel dalam rentang B2:B11 :
Sub UseWrapText()
Range(" B2:B11 ").WrapText = True
End Sub
Saat kami menjalankan makro ini, kami menerima keluaran berikut:
Kita dapat melihat bahwa setiap sel dalam rentang B2:B11 sekarang berisi teks yang dibungkus.
Contoh 3: Bungkus teks semua sel di lembar kerja menggunakan VBA
Kita bisa membuat makro berikut untuk membungkus teks di setiap sel lembar kerja:
Sub UseWrapText()
Cells.WrapText = True
End Sub
Saat kami menjalankan makro ini, kami menerima keluaran berikut:
Kita dapat melihat bahwa setiap sel di lembar kerja sekarang berisi teks yang dibungkus.
Catatan : Anda dapat menemukan dokumentasi lengkap untuk properti VBA WrapText di sini .
Sumber daya tambahan
Tutorial berikut menjelaskan cara melakukan tugas umum lainnya di VBA:
VBA: Cara mengubah warna font
VBA: Cara mengganti karakter dalam sebuah string
VBA: Cara menyisipkan baris dengan format