Если так сделать, закрепляется только в первом листе файла:
Excel = Новый COMОбъект("Excel.Application");
Книга = Excel.WorkBooks.Open(ПутьКФайлу);
Лист1 = Книга.WorkSheets(1);
Лист1.Application.ActiveWindow.SplitRow = 13;
Лист1.Application.ActiveWindow.FreezePanes = 11;
Лист2 = Книга.WorkSheets(2);
Лист2.Application.WorkSheets(2).SplitRow = 13;
Лист2.Application.WorkSheets(2).FreezePanes = 11;
Excel.DisplayAlerts = Ложь;
Попытка
Книга.SaveAs(ПутьКФайлу);
Книга.Close();
Excel.Quit();
Исключение
Книга.Close();
Excel.Quit();
КонецПопытки;
ПоказатьНайденные решения
Закрепление проводит не лист, а окно. Нужно переключить текущий Лист:
Excel = Новый COMОбъект("Excel.Application");
Книга = Excel.WorkBooks.Open(ПутьКФайлу);
Лист1 = Книга.WorkSheets(1);
Лист1.Application.ActiveWindow.SplitRow = 13;
Лист1.Application.ActiveWindow.FreezePanes = 11;
Лист2 = Книга.WorkSheets(2);
Лист2.Activate
Лист2.Application.ActiveWindow.SplitRow = 13;
Лист2.Application.ActiveWindow.FreezePanes = 11;
Лист1.Activate
Excel.DisplayAlerts = Ложь;
Попытка
Книга.SaveAs(ПутьКФайлу);
Книга.Close();
Excel.Quit();
Исключение
Книга.Close();
Excel.Quit();
КонецПопытки;
ПоказатьОстальные ответы
Подписаться на ответы
Инфостарт бот
Сортировка:
Древо развёрнутое
Свернуть все
Закрепление проводит не лист, а окно. Нужно переключить текущий Лист:
Excel = Новый COMОбъект("Excel.Application");
Книга = Excel.WorkBooks.Open(ПутьКФайлу);
Лист1 = Книга.WorkSheets(1);
Лист1.Application.ActiveWindow.SplitRow = 13;
Лист1.Application.ActiveWindow.FreezePanes = 11;
Лист2 = Книга.WorkSheets(2);
Лист2.Activate
Лист2.Application.ActiveWindow.SplitRow = 13;
Лист2.Application.ActiveWindow.FreezePanes = 11;
Лист1.Activate
Excel.DisplayAlerts = Ложь;
Попытка
Книга.SaveAs(ПутьКФайлу);
Книга.Close();
Excel.Quit();
Исключение
Книга.Close();
Excel.Quit();
КонецПопытки;
Показать
Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот