Процедура тестКоличество () Экспорт
	ИмяФайла = глОсновнойКаталог + "Файлы/MultipleSheets.xls";
	Конвертер = СоздатьОбъект ("КонвертерExcel");
	Книга = Конвертер.Открыть (ИмяФайла);
	Листы = Книга.Листы;
	ПроверитьРавенство (Листы.Количество (), 3);
КонецПроцедуры

//-----------------------------------------------------------------------------

Процедура тестПолучить () Экспорт
	ИмяФайла = глОсновнойКаталог + "Файлы/MultipleSheets.xls";
	Конвертер = СоздатьОбъект ("КонвертерExcel");
	Книга = Конвертер.Открыть (ИмяФайла);
	Листы = Книга.Листы;
	ПроверитьРавенство (ТипЗначенияСтр (Листы.Получить (2)), "ЛистЗагрузчикаExcel");
КонецПроцедуры
