簡単な関数があるわけじゃないシンプルなのは、指定文字を削除した文字列をつくって、 その文字列と元の文字列の文字数の差分取る方法 ネタ元 http://officetanaka.net/excel/vba/tips/tips152.htm

Dim str As String: str = "ABC"てな感じ。 ネタ元 https://qiita.com/11295/items/056e7c3f99374145c43b