Вход | Регистрация


1С перестала редактировать XLS файлы на некоторых компах

1С перестала редактировать XLS файлы на некоторых компах
Я
   DTX 4th
 
08.09.16 - 12:29
Сохраняю файл из 1С, а потом пытаюсь проставить там суммы вот таким образом:
ТабДок.Записать(ИмяФайла, ТипФайлаТабличногоДокумента.XLS);
ОбработатьExcel(ИмяФайла);

...

Процедура ОбработатьExcel(ИмяФайла)
    Эксель = Новый COMОбъект("Excel.Application");
    Книга = Эксель.WorkBooks.Open(ИмяФайла);
    Лист = Книга.WorkSheets(1);   
    
    Лист = ПолучитьCOMОбъект(,"Excel.Application");
    
    ВсегоКолонок = Лист.Cells(1,1).SpecialCells(11).Column;
    ВсегоСтрок = Лист.Cells(1,1).SpecialCells(11).Row;      
    
    Для Строка = 5 По ВсегоСтрок Цикл   
           С = Формат(Строка, "ЧГ=0");
        Лист.Cells(Строка,10).Formula = "=SUM(G"+С+"*F"+С+")";
    КонецЦикла;
    Лист.Cells(ВсегоСтрок,10).Formula = "=SUM(J5:J"+Формат(ВсегоСтрок-1, "ЧГ=0")+")";
    Эксель.DisplayAlerts = 0;
    Книга.Close(1);
    Эксель.DisplayAlerts = 1;
        
КонецПроцедуры


Всё это дело успешно работало несколько недель, а на днях перестало проставлять формулы на некоторых компах. У меня и у коллеги всё работает, у двух пользователей - нет.
В чем может быть причина?
 
 
   Euguln
 
1 - 08.09.16 - 12:31
(0) Параметры Excel, стиль ссылок R1C1 сними.
   DTX 4th
 
2 - 08.09.16 - 12:45
(1) Не стоит
   DTX 4th
 
3 - 08.09.16 - 12:52
Черт..

Лист = ПолучитьCOMОбъект(,"Excel.Application");

Это надо закомментить и всё будет работать.. С отладки осталось..

Список тем форума
Рекламное место пустует  Рекламное место пустует
ВНИМАНИЕ! Если вы потеряли окно ввода сообщения, нажмите Ctrl-F5 или Ctrl-R или кнопку "Обновить" в браузере.
Тема не обновлялась длительное время, и была помечена как архивная. Добавление сообщений невозможно.
Но вы можете создать новую ветку и вам обязательно ответят!
Каждый час на Волшебном форуме бывает более 2000 человек.
Рекламное место пустует