VBAなら、あいまい検索も、問題ないのだけれど・・・

上記文章の中に　”あいまい”の文字が含まれているなら、カウントしなさい。

”VBAなら、あいまい検索も、問題ないのだけれど”
これが一つのセルの中にあって、こういう文章が何行もあるとき、”あいまい”という言葉が使われているセルの横のセルに、数字をカウントしていく

文字列がDの列にあって、
検索する”あいまい”という言葉は　J2 のセルに入っているばあい

=IF(COUNTIF(D2,"*"&$J$2&"*"),COUNTIF($D$2:D2,"*"&$J$2&"*"),"")

こんなかんじに