Добавление значения в ячейку excel (ошибка)
☑
0
SeeWorld
10.08.12
✎
10:23
Всем привет! Возникает ошибка и не добавляется значение в ячейку экселя.
Процедура Выгрузить()
Таб.НоваяКолонка("Номенклатура");
Таб.НоваяКолонка("Количество");
Таб.НоваяКолонка("Транспорт");
Таб.НоваяКолонка("Единицы");
Попытка
Эксель = СоздатьОбъект("Excel.Application");
Исключение
Сообщить(ОписаниеОшибки() + "Программа Excel не установлена на данном компьютере!");
Возврат;
КонецПопытки;
Эксель.Visible = 1;
Эксель.Caption = "Наряд на работы";
Книга = Эксель.Workbooks.Add();
Лист = Книга.Worksheets(1);
СписДок = СоздатьОбъект("Документ.НарядНаРаботы");
СписДок.ВыбратьДокументы(НачДата, КонДата );
Пока СписДок.ПолучитьДокумент()=1 Цикл
СтолбецЭк = 0;
СписДок.ВыбратьСтроки();
Пока СписДок.ПолучитьСтроку() = 1 Цикл
СтолбецЭк = СтолбецЭк + 1;
row = row + 1;
Лист.Cells(row,1).Value = Строка(СписДок.Номенклатура); //ОШИБКА
//Таб.НоваяСтрока();
//Таб.Транспорт = СписДок.Транспорт;
//Таб.Номенклатура = СписДок.Номенклатура;
//Таб.Количество = СписДок.Количество;
//Таб.Единицы = СписДок.Единица;
КонецЦикла;
КонецЦикла;
Попытка
Книга.SaveAs("D:\");
Исключение
Сообщить(ОписаниеОшибки() + " Файл не сохранен!");
Возврат;
КонецПопытки;
КонецПроцедуры
1
Happy Bear
10.08.12
✎
10:24
row не инициализирован
2
SeeWorld
10.08.12
✎
10:28
Пробовал не работает.
3
maxxxl-ms
10.08.12
✎
10:31
Во всех ошибках виновата бухающая Лена!!!:D:D:D:D:D:D:D:D
4
0Mint
10.08.12
✎
10:33
v7 поменяй на v8.
5
SeeWorld
10.08.12
✎
10:35
Happy Bear спасибо! Все получилось)
6
SeeWorld
10.08.12
✎
10:48
v8 поменяй на v7)
7
SeeWorld
10.08.12
✎
10:48
Забыл выставить v7
Требовать и эффективности, и гибкости от одной и той же программы — все равно, что искать очаровательную и скромную жену... по-видимому, нам следует остановиться на чем-то одном из двух. Фредерик Брукс-младший