Bagaimana mengkonversi string ke case yang tepat menggunakan vba

Sebuah string dikatakan benar jika huruf pertama dari setiap kata dalam string adalah huruf besar dan semua huruf lainnya dari setiap kata adalah huruf kecil.

Anda dapat menggunakan sintaks berikut di VBA untuk mengonversi rentang sel dengan string ke huruf besar/kecil yang benar:

 Sub ConvertToProperCase()
    
    Dim i As Integer

    For i = 2 To 10
        Range(" B " & i) = StrConv(Range(" A " & i), vbProperCase)
    Next i
    
End Sub

Contoh khusus ini akan mengonversi setiap string dalam rentang A2:A10 ke huruf besar/kecil yang sesuai dan menampilkan hasilnya dalam rentang B2:B10 .

Contoh berikut menunjukkan cara menggunakan sintaksis ini dalam praktiknya.

Contoh: Ubah String menjadi Kasus yang Tepat Menggunakan VBA

Misalkan kita memiliki kolom string berikut di Excel:

Misalkan kita ingin mengonversi setiap string di kolom A ke huruf besar/kecil yang benar dan menampilkan hasilnya di kolom B:

Kita dapat membuat makro berikut untuk melakukan ini:

 Sub ConvertToProperCase()
    
    Dim i As Integer

    For i = 2 To 10
        Range(" B " & i) = StrConv(Range(" A " & i), vbProperCase)
    Next i
    
End Sub

Saat kami menjalankan makro ini, kami menerima keluaran berikut:

Kolom B menampilkan setiap string di kolom A dalam kasus yang sesuai.

Catatan : Anda dapat menemukan dokumentasi lengkap fungsi StrConv di VBA di sini .

Sumber daya tambahan

Tutorial berikut menjelaskan cara melakukan tugas umum lainnya di VBA:

Bagaimana membandingkan string di VBA
Cara menghilangkan spasi pada string di VBA
Bagaimana cara mengganti karakter dalam string di VBA