[Excel]セル内の箇条書きの個数を判別する

Excelで表を作成したときに、１のセル内に、とある条件を箇条書きにしたものと、箇条書きの個数を１行に表現したいということがありました。
もちろん手入力すればいいのですが、後で修正するのが面倒だし、間違える恐れがあるので、コレの自動化を考えてみました。
もちろんマクロを使えば計算できることはわかっていたのですが、マクロを使わずにできないか。と考えて実施してみました。答えは単純で、特定の文字を除いたレングスを取ればよい。という事になります。

たとえば、A1セルに「・」で表現した箇条書きがあり、A2セルに個数を表現する場合、以下のとおりです。

=LEN(A1)-(LEN(SUBSTITUTE(A1,"・","")))