1C шаблоны и готовые решения

Сентябрь 3, 2014

Работа с excel

Filed under: — admin @ 6:26 дп
Попытка
	Эксель = Новый COMОбъект("Excel.Application");
	Книга = Эксель.WorkBooks.Open(ПутьКФайлу);
	Листов = Книга.Worksheets.Count;
	ИмяЛиста = Неопределено;

	для лст = 1 по Листов цикл

		Лист = Книга.WorkSheets(лст);
		ИмяЛиста = Лист.Name;
		ВсегоСтрок = Лист.Cells(1,1).SpecialCells(11).Row;

		для Строка = 1 по ВсегоСтрок цикл

			значениеЯчейки = Лист.Cells(Строка,1).Value;

		конеццикла;

	конеццикла;

Исключение

	Сообщить(ОписаниеОшибки());
	Эксель.Application.Quit();
	
КонецПопытки; 

Эксель.Application.Quit();	

Powered by WordPress

Яндекс.Метрика nikol_dn@list.ru