取引継続月数算出のコード直した

お盆休みに子どもとアスレチックをして地上に降りた安堵感に浸っていたら、唐突に前回書いたコードの無駄に気づきました。
ループの入れ子ふたつは余計でした。一個はカウント変数だけでよかった。
すごく簡単になりました。
何で気づかなかったんだろう。
一応、こんな動きのVBAです。↓