Цитата: Грузчик от 25 июня 2026, 12:47Или я не вижу чего-то очевидного?Посмотри ещё обсуждение к релизу 2.0.5.194 - последнее на другом форуме. Там как раз и обсуждалась возможность сделать развилку в поведении - задавать в глобальной процедуре порядок вызова локальной.
Процедура Глобальная_ПриОткрытии(Конт)
СтатусВозврата(0);
Возврат;
КонецПроцедуры
Процедура Глобальная_ПриВыбореЗакладки(Конт, Номер, Значение)
СтатусВозврата(0);
Возврат;
КонецПроцедуры
СтрокаПодключения = "
|Provider=Microsoft.Jet.OLEDB.4.0;
|Data Source="+ИмяФайлаЭксельНовый+";
|Extended Properties=""Excel 8.0;HDR=YES"";";
Connection = Новый COMОбъект("ADODB.Connection");
Connection.ConnectionString = СтрокаПодключения;
Connection.Open();
Command = Новый COMОбъект("ADODB.Command");
Command.ActiveConnection = Connection;
Command.CommandText = "CREATE TABLE [МояТаблица]
|(Символьный char(255), Дата date, Целый int, Дробный float)";
Command.Execute();
Command.CommandText = "INSERT INTO [МояТаблица]
|(Символьный, Дата, Целый, Дробный)
|values ('АБВГДЕЁ', '12/4/1955', '1234567', '12345,6789')";
Command.Execute();
Command = Неопределено;
Connection.Close();
Функция ПолучитьКоннектExcel(пИмяФайла)
лРез = СоздатьОбъект("ADODB.Connection");
СтрокаПодключения = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source = " + пИмяФайла + "; Extended Properties=""Excel $ver$.0 ;HDR=NO;IMEX=1"";";
СтрокаПодключения12 = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source = " + пИмяФайла + "; Extended Properties=""Excel 12.0 Xml;HDR=No;IMEX=1"";";
СтрокаПодключенияACE= "Provider=Microsoft.ACE.OLEDB.12.0; Data Source = " + пИмяФайла + "; Extended Properties=""Excel 12.0 ;HDR=NO;IMEX=1;""";
Попытка
лРез.Open(СтрокаПодключения12);
Возврат лРез;
Исключение
ОписаниеОш = ОписаниеОшибки();
Сообщить(ОписаниеОш);
КонецПопытки;
Попытка
лРез.Open(СтрокаПодключенияACE);
Возврат лРез;
Исключение
ОписаниеОш = ОписаниеОшибки();
Сообщить(ОписаниеОш);
КонецПопытки;
Для Версия = 8 По 15 Цикл
//подключение к источнику данных
ТекСтрокаПодключения = СтрЗаменить(СтрокаПодключения, "$ver$", Строка(Версия));
Попытка
лРез.Open(ТекСтрокаПодключения);
Возврат лРез;
Исключение
ОписаниеОш = ОписаниеОшибки();
Сообщить(ОписаниеОш);
КонецПопытки;
КонецЦикла;
КонецФункции
Цитата: Ветер в поле от 09 июня 2026, 18:11Красивое решение! Пожалуй на нем стоит и остановиться.
Перем ЛокальнаяПеременнаяГлобальногоМодуля;
Процедура Проверка() Экспорт
ЛокальнаяПеременнаяГлобальногоМодуля = 1;
КонецПроцедуры
ЛокальнаяПеременнаяГлобальногоМодуля = 0;
Процедура Сформировать()
Проверка()
КонецПроцедуры
Цитата: alyuev от 16 июня 2026, 14:40А мы решали проблему выгрузкой через базу v8Наверное, самый разумный способ (если есть v8) - так не будет и потерь данных в ячейке (mxl -> xls режет до 255 символов).
Цитата: Ветер в поле от 16 июня 2026, 11:22Ну и ограничение количества строк в 16384Не, 65536 строк 1с штатно сохраняет спокойно в формате xls. Может, конечно, это какой-то из установленных докторов лечит вместе с фиксом ошибки сохранения. Видимо это имелись в виду столбцы, а не строки.