v8: Работа с индикаторами

 //проверим что файл существует

	ФайлНаДиске = Новый Файл(Файл);

	Если Не ФайлНаДиске.Существует() Тогда

		Предупреждение("Файл не найден!");

		Возврат;

	КонецЕсли;	

	

	Ex = ПолучитьТаблицуExcel(Файл);

	

	СтруктураДанных = Новый Структура("Колонка1, Колонка2, Колонка3, Колонка4, Колонка5, Колонка6");

	

	НС = 1;

	Пока Истина Цикл		

		СтруктураДанных.Колонка1 = СокрЛП(Ex.Cells(НС,1).Value);

		СтруктураДанных.Колонка2 = СокрЛП(Ex.Cells(НС,2).Value);

		СтруктураДанных.Колонка3 = СокрЛП(Ex.Cells(НС,3).Value);

		СтруктураДанных.Колонка4 = СокрЛП(Ex.Cells(НС,4).Value);

		СтруктураДанных.Колонка5 = СокрЛП(Ex.Cells(НС,5).Value);

		СтруктураДанных.Колонка6 = СокрЛП(Ex.Cells(НС,6).Value);

		

		Если СтруктураДанных.Колонка1 = "" Тогда

			Прервать;

		КонецЕсли;

		

		#Если Клиент Тогда

		Состояние("Номер обработанной строки: " + НС);	

		#КонецЕсли

		

		НоваяСтрока = Данные.Добавить();

		ЗаполнитьЗначенияСвойств(НоваяСтрока, СтруктураДанных);

		

		

		НС = НС + 1;

	КонецЦикла;

	

	

	

	Ex.Quit();

   

 Индикатор = ЭлементыФормы.ИндикаторПеребора; 

Индикатор.МаксимальноеЗначение = ВсегоКоличество; // <- ВОТ ТУТ НАДО УКАЗАТЬ КОЛИЧЕСТВО

Индикатор.Значение = 0; 

Пока Истина Цикл

    Индикатор.Значение = Индикатор.Значение + 1;



// ....

КонецЦикла;   

 Индикатор = ЭлементыФормы.Индикатор; 

Индикатор.МаксимальноеЗначение = ТП.Количество(); 

Индикатор.Значение = 0; 

	

Для Каждого Строчка Из ТП Цикл

Индикатор.Значение = Индикатор.Значение + 1;	

НовыйЭлемент = Справочники.Адреса.СоздатьЭлемент();

НовыйЭлемент.Район = Строчка.Колонка1;

НовыйЭлемент.РУ = Строчка.Колонка2;

НовыйЭлемент.Наименование = Строчка.Колонка3;

НовыйЭлемент.Дом = Строчка.Колонка4;

НовыйЭлемент.Емкости = Строчка.Колонка5;

НовыйЭлемент.Головки = Строчка.Колонка6;

НовыйЭлемент.Записать();



КонецЦикла;