EXCEL、VBA

【VBA】文字列の中にある、対象の文字の数を数える

 

文字列の中にある、対象の文字の数を数える

文字列の中にある、対象の文字の数を取得する関数です。

例えば”earthquake”で”a”を指定すると2を返します。

 

引数①　target : この文字列の中から探す

引数②　findChar : この文字列を探す

戻り値：指定した文字の数

Public Function countChar(ByVal Target As String, ByVal findChar As String) As Long
    
    countChar = UBound(Split(Target, findChar))
    
End Function

 

実行例

Debug.Print countChar("language", "a")
' 2

Debug.Print countChar("yahoo.co.jp", "o")
' 3