Утилита изменения всех ячеек книги Excel на Текстовый

09.04.23

Интеграция - Загрузка и выгрузка в Excel

Преобразует стили книги, устанавливая числовой формат для всех стилей — текстовый.

Скачать файл

ВНИМАНИЕ: Файлы из Базы знаний - это исходный код разработки. Это примеры решения задач, шаблоны, заготовки, "строительные материалы" для учетной системы. Файлы ориентированы на специалистов 1С, которые могут разобраться в коде и оптимизировать программу для запуска в базе данных. Гарантии работоспособности нет. Возврата нет. Технической поддержки нет.

Наименование По подписке [?] Купить один файл
Утилита и исходный проект в MS Visual Studio 2022 для изменения всех ячеек книги Excel на Текстовый.
.7z 21,00Mb
1
1 Скачать (1 SM) Купить за 1 850 руб.

При сохранении табличных документов 1С в файлы xslx 1С устанавливает формат ячеек "Общий". При этом, некоторые значения после их редактирования в Excel к некорректному виду. В нашем примере выгружаются данные страховых полисов пациента. Номер полиса - это строка 16 символов, например "6954430886000324". Если пользователь Excel изменит данные для уточнения, то мы получим экспоненциальное представление числа, нечто вроде такого:

6,95443E+15

 

При этом, Excel еще и округляет значение в ячейке.

Чтобы обойти это ограничение пробовали разные варианты (добавление символов и т.п.), но они снижают удобство работы пользователя.

Поэтому была разработана утилита для измерения формата на текстовый всех ячеек на всех листах в файлах xlsx расположенных в той же папке, что и Утилита.
Преобразует стили книги, устанавливая числовой формат для всех стилей — текстовый.
Используется библиотека DocumentFormat.OpenXml.Spreadsheet, установка Mirosoft Office не требуется, работает быстро.

Один из сценариев использования - исполнение утилиты в каталоге выгрузки файлов.

Если Не НаЭкран Тогда 
        //все ячейки преобразуем к текстовому формату, чтобы умный эксель не делал экспоненциальную форму.
        Converter = "XlsTextFormat.exe";
        ПолучитьМакет("XlsTextFormat").Записать(КаталогЗаписиФайла + "\ТМП\" + Converter);
        СтрокаКоманды = КаталогЗаписиФайла + "\ТМП\" + Converter;
        КодВозврата = Неопределено;
        Попытка
            ЗапуститьПриложение(СтрокаКоманды,КаталогЗаписиФайла+"\ТМП",Истина,КодВозврата);
        Исключение
           
        КонецПопытки;

        УдалитьФайлы(КаталогЗаписиФайла + "\ТМП\" + Converter);
КонецЕсли;

 

Excel текстовый формат утилита обработка

См. также

SALE! 15%

Загрузка и выгрузка в Excel Оптовая торговля Печатные формы Бухгалтер Пользователь Платформа 1С v8.3 Управляемые формы Платформа 1C v8.2 1C:Бухгалтерия 1С:Комплексная автоматизация 1.х 1С:Бухгалтерия 2.0 1С:Управление торговлей 10 1С:Розница 2 1С:Управление производственным предприятием 1С:Управление нашей фирмой 1.6 1С:ERP Управление предприятием 2 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 1С:Управление холдингом 1С:Комплексная автоматизация 2.х 1С:Управление нашей фирмой 3.0 1С:Розница 3.0 Бухгалтерский учет Управленческий учет Платные (руб)

Универсальная обработка для загрузки документов из Excel в 1С. Забудьте о ручном вводе: загружайте документы из Excel в 1С за секунды! Не требует указания параметров (номера колонок, номер первой строки таблицы и т.д.) и предварительной настройки. Просто выбираете файл Excel, документ 1С и нажимаете кнопку "Загрузить". Обработка сама находит таблицу в файле Excel, необходимые для загрузки данные в ней (номенклатура, количество, НДС, цена, сумма) и загружает ее в 1С.

6000 5100 руб.

09.11.2016    242584    1117    910    

1046

Загрузка и выгрузка в Excel Маркетплейсы Программист Бухгалтер Пользователь Платформа 1С v8.3 Бухгалтерский учет 1С:Розница 2 1С:Управление нашей фирмой 1.6 1С:ERP Управление предприятием 2 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х Россия Бухгалтерский учет Управленческий учет Платные (руб)

Реальный помощник, с помощью которого Вы преобразуете необходимые документы для Wildberries, OZON, ЯндексМаркет, Мегамаркет, Aliexpress, Детский мир, МагнитЭкспресс (быв.Казань-Экспресс), Леруа Мерлен, ЭНФАНТА (Акушерство), ЛаМода, Летуаль, Твой дом, Золотое Яблоко в документы "Отчет комиссионера (агента) о продажах" и другие. Работает в 1С:БП 3.0, 1С:БП 3.0 КОРП, 1С:УТ 11, 1С:УНФ, 1С:КА 2, 1С:ERP Управление предприятием. Возможность подключить любые маркетплейсы. Анализ продаж ОZON. 30 дней БЕСПЛАТНОГО пользования!

5400 руб.

12.08.2021    38069    407    68    

173

Загрузка и выгрузка в Excel Логистика, склад и ТМЦ Ценообразование, анализ цен Файловый обмен (TXT, XML, DBF), FTP Бухгалтер Пользователь Платформа 1С v8.3 1С:Бухгалтерия 2.0 1С:Управление торговлей 10 1С:Розница 2 1С:Управление нашей фирмой 1.6 1С:ERP Управление предприятием 2 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х 1С:Управление нашей фирмой 3.0 1С:Розница 3.0 Платные (руб)

Эволюция не стоит на месте - новая удобная версия функциональной обработки для Вашего бизнеса! Что же Вы получаете? Удобный и интуитивно понятный интерфейс с 3-мя этапами работы. 2 режима - автоматический и ручной. Чтение XLSX, XLSM, CSV, XML/YML форматов без офиса, на любом сервере! Визуальное связывание колонок файла и реквизитов простым перетаскиванием колонок. Создание или обновление номенклатуры с иерархией, характеристик, доп. реквизитов, упаковок, загрузка практически неограниченного количества картинок на одну номенклатуру (с возможностью загрузки в несколько потоков одновременно), с хранением в томах или в базе. Загрузка номенклатуры поставщиков или поиск по их данным номенклатуры. Загрузка доп. реквизитов в характеристики. Загрузка штрихкодов с генерацией новых. Создание элементов справочников и ПВХ "на лету" для выбранных реквизитов. (Обновление от 10.02.2025, версия 9.9 - 9.15)

16800 руб.

20.11.2015    159506    392    378    

521

Загрузка и выгрузка в Excel Маркетплейсы Программист Бухгалтер Пользователь Платформа 1С v8.3 Бухгалтерский учет Оперативный учет 1С:Управление торговлей 10 1С:ERP Управление предприятием 2 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х 1С:Управление нашей фирмой 3.0 1С:Розница 3.0 Бухгалтерский учет Платные (руб)

Обработки загрузки данных о продажах WildBerries предназначены для следующих конфигураций: Бухгалтерия предприятия, редакция 3.0; Управление нашей фирмой, редакция 3.0; Розница, редакция 3.0; Управление торговлей, редакция 11; Управление торговлей, редакция 10.3

4800 руб.

11.12.2019    59485    1017    3    

255

SALE! 30%

ЭДО и ОФД Загрузка и выгрузка в Excel Бухгалтер Бухгалтерский учет 1С:Управление торговлей 10 1С:Управление производственным предприятием 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х Россия Бухгалтерский учет Платные (руб)

Кто получает документы в формате XML из различных сервисов ЭДО (формат 820 приказ ФНС 31 мая 2019) и набивает их вручную в 1С, тот наверняка хотел бы автоматизировать этот процесс. Поддержка конфигураций: Бухгалтерии 3, УПП 1.3, 1С:КА 2.4 и 1С:КА 2.5, УТ10, УТ11.4 и УТ11.5. Для бухгалтерии 3 добавлена поддержка формат 5.03 от 23/01/2025

3600 руб.

11.02.2020    94846    320    157    

232

Загрузка и выгрузка в Excel Розничная торговля Логистика, склад и ТМЦ Ценообразование, анализ цен Прайсы Системный администратор Программист Платформа 1С v8.3 1С:Комплексная автоматизация 1.х 1С:Розница 2 1С:ERP Управление предприятием 2 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х Управленческий учет Платные (руб)

Загрузка номенклатуры из файлов Excel (xls, xlsx, ods, csv, mxl) в УТ11, КА 2, ERP 2, Розница 2. Задействованы все возможности конфигурации - заполнение реквизитов номенклатуры, дополнительных реквизитов и сведений, характеристики, доп.реквизиты и сведения характеристик. Дополнительные обработки для расширения возможностей.

11100 руб.

29.10.2014    218662    668    529    

459
Отзывы
4. laperuz 47 10.04.23 10:36 Сейчас в теме
(3)
ВрПапка = КаталогВременныхФайлов() + "ziptemp";
	ЧтениеZip = Новый ЧтениеZipФайла(ПутьКXLSX);
	ЧтениеZip.ИзвлечьВсе(ВрПапка);
	ЧтениеZip.Закрыть();
	
	НайденныеФайлы = НайтиФайлы(ВрПапка,"styles.xml",Истина);
	
	Для Каждого НайденныйФайл ИЗ НайденныеФайлы Цикл
		ЧтениеТекста = Новый ЧтениеТекста(НайденныйФайл.ПолноеИмя);
		ТекстФайла = ЧтениеТекста.Прочитать();          
		ТекстФайла = СтрЗаменить(ТекстФайла, "numFmtId=""0""", "numFmtId=""49""");
		ЧтениеТекста.Закрыть();
		
		ЗаписьТекста = Новый ЗаписьТекста(НайденныйФайл.ПолноеИмя);
		ЗаписьТекста.ЗаписатьСтроку(ТекстФайла);
		ЗаписьТекста.Закрыть();
	КонецЦикла;                
	
	ЗаписьZipФайла = Новый ЗаписьZipФайла(Реквизит1);
	ЗаписьZipФайла.Добавить(ВрПапка + "\*", РежимСохраненияПутейZIP.СохранятьОтносительныеПути, РежимОбработкиПодкаталоговZIP.ОбрабатыватьРекурсивно);
	ЗаписьZipФайла.Записать();
Показать


Вот на коленке примерно так
Остальные комментарии
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
1. laperuz 47 10.04.23 07:57 Сейчас в теме
Я конечно не проверял конкретно эту задачу, но в целом xlsx и средствами 1С можно обработать без проблем, зачем внешняя утилита?
2. RomanVaretsa 4 10.04.23 08:47 Сейчас в теме
(1) Средствами 1С можно. Например, через COM-объект... Но во-первых, Excel должен быть установлен, во-вторых, на стороне сервера это крайне муторная задача. Данная утилита эффективно решает очень узкую задачу без каких бы то ни было "танцев" с бубнами. Причем, судя по различным форумам, с данной проблемой коллеги периодически сталкиваются, когда нужно отправить файлы xslx для их последующего изменения пользователями.
3. laperuz 47 10.04.23 09:12 Сейчас в теме
(2)Зачем COM-объект для xlsx?
xlsx это zip-архив с кучей xml, платформа умеет работать и с zip-архивами, и с xml стандартными средствами.
Распаковываем xlsx, меняем что нужно в xml, запаковываем обратно.

У вас же по-любому примерно то же самое делается в утилите.
4. laperuz 47 10.04.23 10:36 Сейчас в теме
(3)
ВрПапка = КаталогВременныхФайлов() + "ziptemp";
	ЧтениеZip = Новый ЧтениеZipФайла(ПутьКXLSX);
	ЧтениеZip.ИзвлечьВсе(ВрПапка);
	ЧтениеZip.Закрыть();
	
	НайденныеФайлы = НайтиФайлы(ВрПапка,"styles.xml",Истина);
	
	Для Каждого НайденныйФайл ИЗ НайденныеФайлы Цикл
		ЧтениеТекста = Новый ЧтениеТекста(НайденныйФайл.ПолноеИмя);
		ТекстФайла = ЧтениеТекста.Прочитать();          
		ТекстФайла = СтрЗаменить(ТекстФайла, "numFmtId=""0""", "numFmtId=""49""");
		ЧтениеТекста.Закрыть();
		
		ЗаписьТекста = Новый ЗаписьТекста(НайденныйФайл.ПолноеИмя);
		ЗаписьТекста.ЗаписатьСтроку(ТекстФайла);
		ЗаписьТекста.Закрыть();
	КонецЦикла;                
	
	ЗаписьZipФайла = Новый ЗаписьZipФайла(Реквизит1);
	ЗаписьZipФайла.Добавить(ВрПапка + "\*", РежимСохраненияПутейZIP.СохранятьОтносительныеПути, РежимОбработкиПодкаталоговZIP.ОбрабатыватьРекурсивно);
	ЗаписьZipФайла.Записать();
Показать


Вот на коленке примерно так
Оставьте свое сообщение