Cara membandingkan string di vba: dengan contoh

Anda dapat menggunakan metode berikut di VBA untuk membandingkan string:

Metode 1: Membandingkan string peka huruf besar-kecil

 SubCompareStrings ()
    Dim i As Integer

    For i = 2 To 10
        Range(" C " & i) = StrComp(Range(" A " & i), Range(" B " & i)) = 0
    Next i
End Sub

Makro ini akan melakukan perbandingan string peka huruf besar-kecil antara string dalam sel yang cocok dalam rentang A2:A10 dan B2:B10 dan mengembalikan TRUE atau FALSE dalam rentang C2:C10 untuk menunjukkan apakah string tersebut sama atau tidak.

Metode 2: Perbandingan string yang tidak peka huruf besar-kecil

 SubCompareStrings ()
    Dim i As Integer

    For i = 2 To 10
        Range(" C " & i) = StrComp(Range(" A " & i), Range(" B " & i), vbTextCompare) = 0
    Next i
End Sub

Makro ini akan melakukan perbandingan string yang tidak peka huruf besar-kecil antara string dalam sel yang cocok dalam rentang A2:A10 dan B2:B10 .

Contoh berikut memperlihatkan cara menggunakan setiap metode dalam praktik dengan daftar string berikut di Excel:

Contoh 1: Membandingkan String Peka Huruf Besar-kecil di VBA

Kita dapat membuat makro berikut untuk melakukan perbandingan string peka huruf besar-kecil antara setiap string yang cocok di kolom A dan B:

 SubCompareStrings ()
    Dim i As Integer

    For i = 2 To 10
        Range(" C " & i) = StrComp(Range(" A " & i), Range(" B " & i)) = 0
    Next i
End Sub

Saat kami menjalankan makro ini, kami menerima keluaran berikut:

Kolom C mengembalikan TRUE jika stringnya sama dan memiliki huruf besar/kecil yang sama.

Jika tidak, kolom C akan mengembalikan FALSE .

Contoh 2: Membandingkan String Tidak Peka Huruf Besar-kecil di VBA

Kita dapat membuat makro berikut untuk melakukan perbandingan string yang tidak peka huruf besar-kecil antara setiap string yang cocok di kolom A dan B:

 SubCompareStrings ()
    Dim i As Integer

    For i = 2 To 10
        Range(" C " & i) = StrComp(Range(" A " & i), Range(" B " & i), vbTextCompare) = 0
    Next i
End Sub

Saat kami menjalankan makro ini, kami menerima keluaran berikut:

Kolom C mengembalikan TRUE jika stringnya sama, apa pun hurufnya.

Kolom C mengembalikan FALSE hanya jika stringnya tidak sama.

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

Sumber daya tambahan

Tutorial berikut menjelaskan cara melakukan tugas umum lainnya di VBA:

VBA: Cara mengganti karakter dalam sebuah string
VBA: Cara menghapus karakter khusus dari sebuah string
VBA: Cara mengubah string menjadi int