Как быстро посчитать всю номенклатуру в 1С? (узнать кол-во номенклатуры в 1с)

Чтобы узнать все кол-во номенклатуры которе есть в 1с?

поможет следующая обработка

ном = Справочники.Номенклатура.Выбрать();
Счетчик = 0;
Пока ном.Следующий() цикл
номен = ном.Ссылка.ПолучитьОбъект();
Счетчик = Счетчик + 1;
КонецЦикла;
Сообщить(Счетчик);