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

09.04.23

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

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

Файлы

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

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

Подписка PRO — скачивайте любые файлы со скидкой до 85% из Базы знаний

Оформите подписку на компанию для решения рабочих задач

Оформить подписку и скачать решение со скидкой

Вы можете заказать платную доработку или адаптацию этой разработки под вашу конфигурацию на «Бирже заказов».

  • 0% комиссии — оплата напрямую исполнителю;
  • Исполнители любого масштаба — от отдельных специалистов до команд под проект;
  • Прямой обмен контактами между заказчиком и исполнителем;
  • Безопасная сделка — при необходимости;
  • Рейтинги, кейсы и прозрачная система откликов.

При сохранении табличных документов 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 текстовый формат утилита обработка

См. также

Загрузка и выгрузка в Excel Маркетплейсы Программист Бухгалтер Пользователь 1С:Предприятие 8 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С:ERP.

5490 руб.

12.08.2021    45916    579    71    

218

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

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

12444 руб.

29.10.2014    232631    750    534    

498

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

Загружает данные из Акта приемки товара от ООО «Вайлдберриз», полученный из личного кабинета в формате *.xlsx или API в документ "Реализация (акты, накладные, УПД)" для конфигурации: Бухгалтерия предприятия, редакция 3.0, в документ "Реализация товаров и услуг" для Управление торговлей, редакция 11; Комплексная автоматизация 2; ERP 2 Управление предприятием и в документ "Расходная накладная" для Управление нашей фирмой 3.0; Розница 3.0

6100 руб.

24.01.2021    24896    122    0    

63

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

Загрузка данных отчета о реализации товаров из сервиса Lamoda «Ламода» для конфигурации: 1С:Бухгалтерия предприятия, редакция 3.0; 1C:Управление торговлей, редакция 11 и 1C:Управление нашей фирмой, редакция 3.0 в документ "Отчет комиссионера (агента) о продажах".

6100 руб.

01.03.2021    12517    71    0    

29
Отзывы
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Файла.Записать();
Показать


Вот на коленке примерно так
Для отправки сообщения требуется регистрация/авторизация