|
Работа с Excel в Восьмёрке |
☑ |
0
В_Пупкин
25.09.11
✎
20:49
|
Пытаюсь прочесть Excel файл делаю:
Процедура КнопкаВыполнитьНажатие(Кнопка)
СписокОС = Новый СписокЗначений;
Диалог = Новый ДиалогВыбораФайла(РежимДиалогаВыбораФайла.Открытие);
Диалог.Заголовок = "Выберите файл со списком ОС";
Диалог.ПолноеИмяФайла = "";
Диалог.ПредварительныйПросмотр = Истина;
Если Диалог.Выбрать() Тогда
ПутьКФайлу = Диалог.ПолноеИмяФайла;
КонецЕсли;
Эксель = Новый COMОбъект("Excel.Application");
Книга = Эксель.WorkBooks.Open(ПутьКФайлу);
Лист = Книга.Sheets(1);
Для С = 11 по 319 Цикл
Код = Лист.Cells(С,2).Value;
КонецЦикла;
КонецПроцедуры
Смотрю в отладчике-код "Неопределено".Что я делаю не так?Поможите!!!
|
|
1
Kookish
25.09.11
✎
21:27
|
У меня этот код работает. Может, файл не открылся из-за того, что занят? Эксель, Книга, Лист в отладчике смотрел?
|
|
2
aleks-id
25.09.11
✎
21:29
|
Книга = Эксель.WorkBooks.Open(ПолноеИмяФайла);
|
|
3
Kookish
25.09.11
✎
21:31
|
(2) Да не в этом дело. У него так и есть, посмотри. Полностью рабочий код.
|
|
4
aleks-id
25.09.11
✎
21:34
|
(3) упс. проглядел... пусть попробует офис переустановить. но пусть сначала попробует посмотреть в диспетчере задач - нет ли там зависшего экселя, и снять его перед отладкой если есть...
|
|
5
В_Пупкин
25.09.11
✎
21:37
|
Спасибо alex-id.С меня пиво.
|
|
6
Kookish
25.09.11
✎
22:12
|
Эксель.Quit(), Кэп... Это я для себя написал, чтоб запомнить.
|
|