Excelで、こんなクイズが出題された。鯖と鯵は、それぞれ何匹？ 今回は、Split関数を用いて解いてみた。 Function 何匹(全体 As String, 種類 As String) As Long 何匹 = UBound(Split(全体, 種類)) End Function 例えば「鯖鯵鯖」（←全体）という文字を、「…