0
Aleksei_Pro
28.08.12
✎
20:47
|
ребят подскажите, как установить чтение 1 страницы и сделать перебор строк и получить значение ячеек строки:
ТекстПользователю = "Чтение файла Excel";
Попытка
COMОбъект = Новый COMОбъект("Excel.Application");
Исключение
СообщениеОбОшибке = НСтр("ru = 'Не удалось загрузить цены из файла Excel. Убедитесь, что на сервере установлена программа Microsoft Excel. Подробности: '")
+ КраткоеПредставлениеОшибки(ИнформацияОбОшибке());
ВызватьИсключение СообщениеОбОшибке;
КонецПопытки;
Попытка
Workbook = COMОбъект.Workbooks.Open(ИмяФайлаЗагрузки);
Workbook.Close();
Исключение
|
|
3
skunk
28.08.12
✎
21:16
|
КолСтрок1 = НашФайл.Sheets.Item(ИмяЛиста).UsedRange.Rows.Count();// Количество строк
КолСтрок2 = Лист.Cells(1,1).SpecialCells(11).Row;// Количество строк - вариант 2
КолСтрок = Макс(КолСтрок1, КолСтрок2);// Берем тот что больше
для х = 1 по КолСтрок цикл
сообщить(Лист1.Cells(х, 1).Value);
|
|