Алгоритм подсчёта символов остался неизменным (если Вы об этом), однако сам подсчёт - теперь оформлен в виде функции, что, на мой взгляд, значительно облегчает тестирование примера. Кроме того, после незначительных изменений, такую функцию можно даже вызывать из ячеек рабочего листа, впрочем, нам эта возможность пока не нужна ...