Как ускорить формирование прайс-листов из 1С в Excel при наличии большого количества гиперссылок

← На главную

При работе с крупными каталогами товаров в 1С:Управление торговлей или других конфигурациях часто возникает задача формирования красивых и функциональных прайс-листов (ПЛ). Одной из наиболее трудоемких операций является создание кликабельных гиперссылок на фотографии товаров прямо в файле Excel. Когда объем данных превышает 10 000 позиций, стандартные методы через COM-объект могут замедлять процесс до критических 7–10 минут, что неприемлемо для оперативной работы. Разберем, как можно оптимизировать этот процесс и сократить время формирования документа в несколько раз.

Анализ причины низкой производительности

Проанализируем, почему возникает «затык». Основная проблема заключается в использовании COM-соединения для построчного обращения к ячейкам Excel. Каждый вызов метода Shapes.Hyperlinks.Add или прямое форматирование ячейки через Excel.Application требует переключения контекста между процессом 1С и процессом Excel. На 10 000 строках это вызывает колоссальные накладные расходы. Выясним, какие альтернативные пути помогут нам сохранить функциональность гиперссылок, не теряя в скорости.

Способ 1. Использование формул Excel вместо объектов Hyperlink

Рассмотрим самый быстрый способ создания ссылок без обращения к тяжелым методам объектов Hyperlink. Мы можем записывать в ячейку не просто текст, а стандартную формулу Excel. Это позволит нам выгружать данные как обычные строки, а Excel сам интерпретирует их при открытии.

Посмотрим на пример формирования строки формулы в 1С:


// Формируем текст формулы для Excel
// АдресСсылки — это URL фото, ТекстОтображения — что увидит клиент
ТекстФормулы = "=ГИПЕРССЫЛКА(""" + СсылкаНаФото + """; """ + "Посмотреть фото" + """)";
ОбластьЯчейка.Текст = ТекстФормулы;

Важный нюанс: Чтобы Excel корректно распознал формулу при записи через ТабличныйДокумент, иногда требуется дополнительное действие. Если после открытия файла ссылки отображаются как текст, проанализируем ситуацию и добавим небольшой программный «пинок» через COM уже после сохранения файла. Вместо перебора всех строк, мы выполним одну команду «Найти и заменить» для всего столбца:


// После сохранения файла XLSX открываем его один раз через COM
ExcelApp = Новый COMОбъект("Excel.Application");
Книга = ExcelApp.Workbooks.Open(ПутьКФайлу);
Лист = Книга.Sheets(1);

// Массово заменяем знак "=" на "=", чтобы Excel пересчитал формулы
Лист.Columns("H:H").Replace("=", "="); // Допустим, ссылки в колонке H

Книга.Save();
ExcelApp.Quit();

Этот метод сокращает время обработки с минут до нескольких секунд, так как основная работа по формированию текста происходит внутри 1С.

Способ 2. Оптимизация работы с COM-объектом Excel

Если специфика прайс-листа требует обязательного использования прямого управления Excel.Application, мы должны максимально снизить нагрузку на графический интерфейс и движок пересчета. Рассмотрим правильную последовательность команд для ускорения работы:

Отключите обновление экрана: ExcelApp.ScreenUpdating = Ложь;
Отключите автоматический пересчет формул: ExcelApp.Calculation = -4135; (соответствует константе xlCalculationManual)
Отключите события: ExcelApp.EnableEvents = Ложь;

Применим эти настройки в коде формирования ПЛ:


ExcelApp = Новый COMОбъект("Excel.Application");
ExcelApp.ScreenUpdating = Ложь;
ExcelApp.Calculation = -4135;
ExcelApp.EnableEvents = Ложь;

// Основной цикл формирования 10 000 строк
Для Каждого СтрокаПрайса Из ТаблицаДанных Цикл
    // ... логика заполнения ячеек ...
КонецЦикла;

// Возвращаем настройки перед сохранением
ExcelApp.ScreenUpdating = Истина;
ExcelApp.Calculation = -4105; // xlCalculationAutomatic
ExcelApp.EnableEvents = Истина;

Проанализировав практику, можно утверждать, что только эти три настройки могут ускорить процесс в 2–3 раза за счет исключения перерисовки интерфейса при каждой итерации цикла.

Способ 3. Экспорт через промежуточный формат HTML

Выясним интересный факт: платформа 1С при сохранении ТабличногоДокумента в формате HTML гораздо лучше сохраняет свойства гиперссылок, чем при прямой записи в XLSX. Это можно использовать как «обходной маневр».

Разберем алгоритм действий:

В макете 1С для ячейки устанавливаем свойство Гиперссылка в значение Истина и заполняем ТекстГиперссылки.
Записываем табличный документ во временный файл с расширением .html.
Программно открываем этот HTML файл в Excel и пересохраняем его как полноценный .xlsx.

Посмотрим на программную реализацию:


ПутьHTML = КаталогВременныхФайлов() + "price.html";
ТабДок.Записать(ПутьHTML, ТипФайлаТабличногоДокумента.HTML);

ExcelApp = Новый COMОбъект("Excel.Application");
Книга = ExcelApp.Workbooks.Open(ПутьHTML);
// Сохраняем в формате Excel 12 (это XLSX)
Книга.SaveAs(ПутьКФайлуПрайса, 51); 
Книга.Close();
ExcelApp.Quit();

Этот метод позволяет избежать построчного перебора ячеек вообще, передавая всю работу по интерпретации тегов <a href="..."> самому приложению Excel, которое делает это крайне эффективно.

Способ 4. Современные возможности платформы (8.3.20+)

В современных версиях платформы 1С (начиная с 8.3.20) разработчики значительно доработали механизмы экспорта. Если вы используете актуальные релизы, проверим настройки ТабличногоДокумента. Для того чтобы гиперссылки «пролетали» в Excel без мучений, убедитесь, что:

У ячейки в макете или программно установлено Ячейка.Гиперссылка = Истина;
Заполнен параметр ТекстГиперссылки (именно он станет адресом URL).
При вызове метода Записать() используется ТипФайлаТабличногоДокумента.XLSX.

Если ссылки все равно не активны, вернемся к Способу 1 с формулами, так как он является наиболее универсальным и не зависит от капризов конвертации платформы.