Разберем распространенную ситуацию: вы написали обработку для загрузки данных из Excel, которая прекрасно работает на вашем домашнем компьютере, но при попытке запуска в офисе или на сервере выдает пугающее сообщение: «Error calling constructor (COMОбъект): -2147221005(0x800401F3): Недопустимая строка с указанием класса». Проанализируем причины этой ошибки и рассмотрим наиболее эффективные способы её решения, которые позволят вашей программе работать стабильно в любой среде.
Первым делом проанализируем, что именно сообщает нам система. Ошибка 0x800401F3 однозначно указывает на то, что операционная система не может найти в реестре сведения о COM-классе Excel.Application. Проще говоря, 1С пытается обратиться к программному интерфейсу Microsoft Excel, но этот интерфейс не зарегистрирован.
Основные причины возникновения проблемы:
Excel.Application.Посмотрим на ситуацию, описанную в теме: на рабочем компьютере вместо Microsoft Excel используется LibreOffice. Это означает, что старый код через Новый COMОбъект("Excel.Application") работать не будет. Нам нужно изменить подход.
Это самый правильный и надежный метод. Платформа 1С 8.3 обладает встроенными средствами для чтения файлов Excel форматов .xls и .xlsx напрямую, без использования сторонних программ. Это делает вашу обработку автономной.
Рассмотрим, как правильно реализовать чтение файла. Если вы просто напишете ТабличныйДокумент.Прочитать(), вы можете столкнуться с тем, что метод «не найден». Выясним, почему это происходит. Метод Прочитать доступен на сервере, в толстом клиенте или во внешнем соединении. В управляемом приложении (тонкий клиент) напрямую прочитать файл с диска в ТабличныйДокумент нельзя.
Проанализируем правильный алгоритм работы в управляемых формах:
ТабличныйДокумент.Разберем пример кода для реализации этой схемы:
&НаКлиенте
Процедура ЗагрузитьФайл(Команда)
// Выбираем файл с диска
Диалог = Новый ДиалогВыбораФайла(РежимДиалогаВыбораФайла.Открытие);
Диалог.Фильтр = "Excel файлы (*.xls, *.xlsx)|*.xls;*.xlsx";
Если Диалог.Выбрать() Тогда
ПутьКФайлу = Диалог.ПолноеИмяФайла;
// Помещаем файл во временное хранилище
Описание = Новый ОписаниеОповещения("ЗавершитьЗагрузку", ЭтотОбъект);
НачатьПомещениеФайла(Описание, , ПутьКФайлу, Ложь, УникальныйИдентификатор);
КонецЕсли;
КонецПроцедуры
&НаКлиенте
Процедура ЗавершитьЗагрузку(Результат, Адрес, ВыбранноеИмяФайла, ДополнительныеПараметры) Экспорт
Если Результат Тогда
ПрочитатьФайлНаСервере(Адрес, ВыбранноеИмяФайла);
КонецЕсли;
КонецПроцедуры
&НаСервере
Процедура ПрочитатьФайлНаСервере(АдресХранилища, ИмяФайла)
// Получаем расширение для корректного создания временного файла
Расширение = ?(НСтр(ИмяФайла, "xlsx") > 0, "xlsx", "xls");
// Извлекаем данные и записываем во временный файл на сервере
Данные = ПолучитьИзВременногоХранилища(АдресХранилища);
ИмяВременногоФайла = ПолучитьИмяВременногоФайла(Расширение);
Данные.Записать(ИмяВременногоФайла);
// Читаем файл встроенными средствами 1С
ТД = Новый ТабличныйДокумент;
Попытка
ТД.Прочитать(ИмяВременногоФайла);
// Пример обхода строк (аналог Excel.Cells)
Для НомерСтроки = 1 По ТД.ВысотаТаблицы Цикл
// Получаем значение из 26-й колонки (Z)
ЗначениеЯчейки = ТД.Область(НомерСтроки, 26).Текст;
// Обработка данных...
КонецЦикла;
Исключение
Сообщить("Ошибка чтения: " + ОписаниеОшибки());
КонецПопытки;
УдалитьФайлы(ИмяВременногоФайла);
КонецПроцедуры
В коде через COM-объект вы привыкли использовать конструкцию Excel.Cells(ТекСтрока, 26).Value. При переходе на ТабличныйДокумент синтаксис изменится. Рассмотрим основные соответствия:
ТД.Область(Строка, Колонка).Текст. Важно помнить, что свойство Текст возвращает строку так, как она видна в ячейке (с форматированием).ТД.Область(Строка, Колонка).Содержимое.Значение (если это тип СодержащееЗначение).СокрЛП(ТД.Область(Строка, Колонка, Строка, Колонка).Текст) для надежного получения строковых данных.Если по какой-то причине ТабличныйДокумент вам не подходит (например, структура файла слишком сложная), можно воспользоваться технологией ADO. Она работает быстрее, чем COM-объект Excel, и требует только наличия драйвера Microsoft Access Database Engine, который часто присутствует в системе по умолчанию.
Проанализируем пример кода для чтения через ADO:
Connection = Новый COMОбъект("ADODB.Connection");
ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" + ИмяФайла + ";Extended Properties=""Excel 12.0 Xml;HDR=YES"";";
Попытка
Connection.Open(ConnectionString);
Recordset = Новый COMОбъект("ADODB.Recordset");
// [Лист1$] - имя листа в файле Excel
Recordset.Open("SELECT * FROM [Лист1$]", Connection);
Пока Recordset.EOF() = 0 Цикл
// Обработка полей
Значение = Recordset.Fields.Item(25).Value; // Индексация с нуля
Recordset.MoveNext();
КонецЦикла;
Recordset.Close();
Connection.Close();
Исключение
Сообщить("Ошибка ADO: " + ОписаниеОшибки());
КонецПопытки;
Так как на рабочем компьютере установлен LibreOffice, мы можем адаптировать код под него. Это сложнее, но если вам критически важно использовать именно объектную модель офисного пакета, рассмотрим этот путь.
Вместо Excel.Application создается сервис-менеджер:
ServiceManager = Новый COMОбъект("com.sun.star.ServiceManager");
Desktop = ServiceManager.createInstance("com.sun.star.frame.Desktop");
// Путь к файлу должен быть в формате URL (file:///...)
ПутьКФайлуURL = "file:///" + СтрЗаменить(ИмяФайла, "\", "/");
Параметры = Новый COMSafeArray("Unknown", 0);
Document = Desktop.loadComponentFromURL(ПутьКФайлуURL, "_blank", 0, Параметры);
Sheets = Document.getSheets();
Sheet = Sheets.getByIndex(0); // Первый лист
// Получение ячейки (Колонка, Строка) - индексация с нуля
Cell = Sheet.getCellByPosition(25, ТекСтрока - 1);
Значение = Cell.getString(); // или .getValue() для чисел
Мы проанализировали ситуацию и выяснили, что ошибка «Недопустимая строка с указанием класса» — это не приговор для вашей обработки. Самым современным и рекомендуемым способом является использование ТабличныйДокумент.Прочитать(). Это решение избавляет вас от зависимости от установленного ПО, проблем с разрядностью и лицензированием Microsoft Office.
Рекомендации для разработчика:
.xlsx, помните, что это ZIP-архив с XML-файлами. В особо сложных случаях (огромные файлы на сотни тысяч строк) можно использовать ЧтениеZipФайла и ЧтениеXML для максимально быстрого разбора данных.Табличного документа будет более чем достаточно.Используя предложенные методы, вы создадите надежный инструмент, который не «сломается» при смене офисного ПО на компьютере пользователя.