Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/PQ чтение форматов файлов 1С в папке - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин  
PQ чтение форматов файлов 1С в папке
Anis625 Дата: Четверг, 22.07.2021, 16:04 | Сообщение № 1
Группа: Заблокированные
Ранг: Ветеран
Сообщений: 674
Репутация: 31 ±
Замечаний: 20% ±

Excel 2013
Добрый день, всем участникам форума!

В поисках решения реализации своей очередной задачки нашел код у известного (я так думаю) Товарища Excel.
При помощи готового обработчика PQ удалось извлечь форматы ячеек из выгрузки-файла 1С (т.к. ячейки файлов 1С не имеют отступов чтобы зацепиться за них).
Но есть необходимость в обработке не одного файла, а несколько однотипных файлов. Удалось исправить строку источника на папку (относительную ссылку) в запросе "Числа": [vba]
Код
source = Folder.Files(Excel.CurrentWorkbook(){[Name="Papka"]}[Content]{0}[Путь к папке])[Content]
[/vba]
Загвоздка в том, что функция DecompressFiles в строке MyData возвращает null.
Попробовал добавить в конце source {0} - в этом случае он видит первый в списке файл, пробовал добавить {0 ... 100} (число 100 условно, т.к. количество файлов может быть любое) - тоже ошибку выдает. Пробовал в конце писать {Список}, [Список] - название таблицы со списком Binary файлов - тоже ошибку выводит.
Подскажите, пожалуйста, как правильно поправить код в запросе "Числа" чтобы отработать несколько файлов в папке.
P.S. второй запрос работает отлично с папкой с файлами.
К сообщению приложен файл: 9844623.xlsx (216.3 Kb) · _.26.xlsx (14.9 Kb)


Сообщение отредактировал Anis625 - Четверг, 22.07.2021, 17:54
 
Ответить
СообщениеДобрый день, всем участникам форума!

В поисках решения реализации своей очередной задачки нашел код у известного (я так думаю) Товарища Excel.
При помощи готового обработчика PQ удалось извлечь форматы ячеек из выгрузки-файла 1С (т.к. ячейки файлов 1С не имеют отступов чтобы зацепиться за них).
Но есть необходимость в обработке не одного файла, а несколько однотипных файлов. Удалось исправить строку источника на папку (относительную ссылку) в запросе "Числа": [vba]
Код
source = Folder.Files(Excel.CurrentWorkbook(){[Name="Papka"]}[Content]{0}[Путь к папке])[Content]
[/vba]
Загвоздка в том, что функция DecompressFiles в строке MyData возвращает null.
Попробовал добавить в конце source {0} - в этом случае он видит первый в списке файл, пробовал добавить {0 ... 100} (число 100 условно, т.к. количество файлов может быть любое) - тоже ошибку выдает. Пробовал в конце писать {Список}, [Список] - название таблицы со списком Binary файлов - тоже ошибку выводит.
Подскажите, пожалуйста, как правильно поправить код в запросе "Числа" чтобы отработать несколько файлов в папке.
P.S. второй запрос работает отлично с папкой с файлами.

Автор - Anis625
Дата добавления - 22.07.2021 в 16:04
Anis625 Дата: Пятница, 23.07.2021, 07:46 | Сообщение № 2
Группа: Заблокированные
Ранг: Ветеран
Сообщений: 674
Репутация: 31 ±
Замечаний: 20% ±

Excel 2013
Модераторам: переместите, пожалуйста, задачку в платную ветку
 
Ответить
СообщениеМодераторам: переместите, пожалуйста, задачку в платную ветку

Автор - Anis625
Дата добавления - 23.07.2021 в 07:46
Serge_007 Дата: Пятница, 23.07.2021, 09:12 | Сообщение № 3
Группа: Админы
Ранг: Местный житель
Сообщений: 16475
Репутация: 2749 ±
Замечаний: ±

Excel 2016
Здравствуйте

переместите, пожалуйста, задачку в платную ветку
Переместил


ЮMoney:41001419691823 | WMR:126292472390
 
Ответить
СообщениеЗдравствуйте

переместите, пожалуйста, задачку в платную ветку
Переместил

Автор - Serge_007
Дата добавления - 23.07.2021 в 09:12
Anis625 Дата: Суббота, 24.07.2021, 12:50 | Сообщение № 4
Группа: Заблокированные
Ранг: Ветеран
Сообщений: 674
Репутация: 31 ±
Замечаний: 20% ±

Excel 2013
Может обходной путь есть решения этой задачки?
Например VBA+PQ. С коллегой по работе сегодня решили эту задачку путем создания батника (файлы архивирует и сразу распаковывает) и дальше PQ обрабатывает xml файлы SheetDoc по алгоритму из файла примера.
Решение, но не удобное. Хотелось бы найти решение в одном файле.
Если PQ не может извлекать из папки с excel файлами xml файлы может можно vba+pq решить задачку (без батника)
 
Ответить
СообщениеМожет обходной путь есть решения этой задачки?
Например VBA+PQ. С коллегой по работе сегодня решили эту задачку путем создания батника (файлы архивирует и сразу распаковывает) и дальше PQ обрабатывает xml файлы SheetDoc по алгоритму из файла примера.
Решение, но не удобное. Хотелось бы найти решение в одном файле.
Если PQ не может извлекать из папки с excel файлами xml файлы может можно vba+pq решить задачку (без батника)

Автор - Anis625
Дата добавления - 24.07.2021 в 12:50
mathiax90 Дата: Пятница, 30.07.2021, 21:47 | Сообщение № 5
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 202
Репутация: 24 ±
Замечаний: 0% ±

Excel 2007
Если никто не взялся. Хотел бы спросить. Итоговая задача прочитать XML и что-то сделать с данными?
Просто для меня описание задачи не совсем понятное. Если да и заказ свободен, то я готов взяться. Или нужны детали.


webmoney: R242692021885
ЯД:410013877261817


Сообщение отредактировал mathiax90 - Пятница, 30.07.2021, 21:47
 
Ответить
СообщениеЕсли никто не взялся. Хотел бы спросить. Итоговая задача прочитать XML и что-то сделать с данными?
Просто для меня описание задачи не совсем понятное. Если да и заказ свободен, то я готов взяться. Или нужны детали.

Автор - mathiax90
Дата добавления - 30.07.2021 в 21:47
Anis625 Дата: Понедельник, 02.08.2021, 04:13 | Сообщение № 6
Группа: Заблокированные
Ранг: Ветеран
Сообщений: 674
Репутация: 31 ±
Замечаний: 20% ±

Excel 2013
mathiax90, в связи с длительным отсутствием обратной связи по задачке смотреть стал реже. Надеюсь у вас получится помочь. Не оперативно, но на связи по телефону буду если у вас будет решение задачки.
Текущее решение:
В первой строке кода PQ указываем путь к папке с файлом (!). Со второй строки код полностью взят у Товарища Excel. Во второй строке указана функция по извлечению из файла Excel xml файл. В третьей строке применяется функция и извлекается xml файл. Дальше код извлекает информацию из этого xml файла.
Что необходимо:
При помещении в папку 2-х и более файлов (можно сделать копию файла Апрель, Во вложении первого сообщения) третья строка возвращает null. Т.е. получается функция может извлечь xml файл только из одного файла. Предполагаю, что либо в функции (вторая строка кода) либо в третьей строке кода что-то нужно поменять чтобы можно было отрабатывать несколько файлов.
Что удалось сделать самим:
Промежуточное (не самое удобное) решение удалось сделать второй и третий шаг при помощи батника извлекаем xml файлы из всех файлов в папке.
А хотелось бы найти решение без промежуточных решений. В крайнем случае заменить 2-3 шаг на vba.
 
Ответить
Сообщениеmathiax90, в связи с длительным отсутствием обратной связи по задачке смотреть стал реже. Надеюсь у вас получится помочь. Не оперативно, но на связи по телефону буду если у вас будет решение задачки.
Текущее решение:
В первой строке кода PQ указываем путь к папке с файлом (!). Со второй строки код полностью взят у Товарища Excel. Во второй строке указана функция по извлечению из файла Excel xml файл. В третьей строке применяется функция и извлекается xml файл. Дальше код извлекает информацию из этого xml файла.
Что необходимо:
При помещении в папку 2-х и более файлов (можно сделать копию файла Апрель, Во вложении первого сообщения) третья строка возвращает null. Т.е. получается функция может извлечь xml файл только из одного файла. Предполагаю, что либо в функции (вторая строка кода) либо в третьей строке кода что-то нужно поменять чтобы можно было отрабатывать несколько файлов.
Что удалось сделать самим:
Промежуточное (не самое удобное) решение удалось сделать второй и третий шаг при помощи батника извлекаем xml файлы из всех файлов в папке.
А хотелось бы найти решение без промежуточных решений. В крайнем случае заменить 2-3 шаг на vba.

Автор - Anis625
Дата добавления - 02.08.2021 в 04:13
Anis625 Дата: Понедельник, 16.08.2021, 09:56 | Сообщение № 7
Группа: Заблокированные
Ранг: Ветеран
Сообщений: 674
Репутация: 31 ±
Замечаний: 20% ±

Excel 2013
Все еще актуально
 
Ответить
СообщениеВсе еще актуально

Автор - Anis625
Дата добавления - 16.08.2021 в 09:56
Anis625 Дата: Четверг, 19.08.2021, 09:40 | Сообщение № 8
Группа: Заблокированные
Ранг: Ветеран
Сообщений: 674
Репутация: 31 ±
Замечаний: 20% ±

Excel 2013
В связи с отсутствием предложений по решению задачи: кросс
 
Ответить
СообщениеВ связи с отсутствием предложений по решению задачи: кросс

Автор - Anis625
Дата добавления - 19.08.2021 в 09:40
R_Dmitry Дата: Четверг, 19.08.2021, 22:08 | Сообщение № 9
Группа: Друзья
Ранг: Участник
Сообщений: 74
Репутация: 34 ±
Замечаний: 0% ±

2010
Выполнено


{Skype : RDG_Dmitry} Если программа тебе понятна,значит она уже устарела
 
Ответить
СообщениеВыполнено

Автор - R_Dmitry
Дата добавления - 19.08.2021 в 22:08
Anis625 Дата: Воскресенье, 22.08.2021, 11:13 | Сообщение № 10
Группа: Заблокированные
Ранг: Ветеран
Сообщений: 674
Репутация: 31 ±
Замечаний: 20% ±

Excel 2013
Спасибо
 
Ответить
СообщениеСпасибо

Автор - Anis625
Дата добавления - 22.08.2021 в 11:13
  • Страница 1 из 1
  • 1
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2024 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!