Выбрать дату в календареВыбрать дату в календаре

Страницы: 1
Архивирование подпапок только с Bandizip
 
Добрый вечер, всем участникам форума.
Прошу помочь в доработке или написании макроса по архивированию с тем же названием подпапок в заданной в ячейке папке (пароль на архив опционно). Есть несколько НО: на работе PowerShell не работает (первая кнопка вложенного файла), 7zip запрещено политикой безопасности, RAR нельзя устанавливать (да и вообще нельзя устанавливать что-либо). Есть только Bandizip с набором файлов как в на фотке (во вложении). Фото с набором файлов прикладываю, потому что 3 код (в excel файле) на ПК коллеги работает (у него 2016 года bandizip с bz.exe а у меня не работает, пробовал и bc.exe и Bandizip.exe)
Не явная выборка по нескольким условиям
 
Добрый день, всем участникам форума
Не самым изящным способом пытаюсь решить свою задачку (с множеством ЕСЛИ), и чтобы продолжить идти по этому бредовому пути спрошу у знающих людей.
Есть ли изящный способ (без VBA) выборки данных из таблиц если в этой таблице условия указаны только необходимые. Например если "формы БП" указан СМ то коэффициент 0,8, а все остальные коэффициент 1 (вот это "все остальные" - не знаю как прописать в формуле). Все бы ничего пытаюсь учесть такие "все остальные" по нескольким столбцам.
Буду признателен за любой совет/подсказку.
Изменено: puh840 - 29.06.2024 11:47:04
Формулы Excel в Power Query
 
Кросс

Добрый день!
Прошу Вас помочь решить задачу полностью в PQ, реализованную в PQ+формулы Excel.
Есть выгрузка из системы документооборота. Обработчиком PQ обрабатываю файл (не кидайте помидорами если увидите что криво как сделал) и настроил Dashboard сводными таблицами/диаграммами (удалил, не в нем вопрос). Сделал все в PQ кроме:
1) Столбец U - расчет формулой чисто рабочие часы (с 7:45 до 12:00 и с 13:15 до 17:00) между двумя датами со временем без учета выходных и праздников
2) Столбец Х - расчет формулы ЧИСТРАБДНИ
3) Столбец W - поиск названия интервала из таблицы на листе Справочник
Остальные столбцы осилю в PQ если получится эти три формулы в PQ реализовать.

На вопрос какой бюджет не смогу ответить т.к. не знаю трудоемкость работы и ваших расценок, поэтому лучше предложите цену, чтобы оценить целесообразность реализации задачи.
Сообщения в телеграмм из Google Sheet по триггерам
 
Кросс

Добрый день!
Прошу Вас помочь с решением задачки по отправке сообщений в телеграмм при срабатывании триггеров в Google Sheet.
Книга: My WebPage (доступ пока в режиме чтения, в режиме редактирования когда кто-то возьмет в работу).
Лист Data обновляется 31 (+/-) минуту каждого часа. Формулами заполняется таблица в диапазоне A3:W18 на листе Trigger. Необходимо предусмотреть отправку сообщений (с текстом из столбца H, одна ячейка=одно сообщение) в телеграмм при изменении значений в столбце G:
1) с 0 в любое другое число
2) при изменении числа
3) при переходе в 0 отправка сообщения не нужна.
Доп. скрываемый столбец F сделал как вариант можно использовать для копирования предыдущего значения триггера (со столбца G).
Обновление на листе Data происходит бодро, а на листах (в т.ч. trigger) много формул поэтому обновление происходит с длительной задержкой (скорее всего необходимо учесть задержку, не критично 2-3 минуты после обновления данных).
Данный функционал уже реализован в Excel файле готов поделиться с кодом кто возьмет в работу.
На вопрос какой бюджет не смогу ответить т.к. не знаю трудоемкость работы и ваших расценок, поэтому лучше предложите цену, чтобы оценить целесообразность реализации задачи.

P.S. Скрипт работает даже при закрытой книге, поэтому отправку сообщений также необходимо предусмотреть с закрытой книги (основная цель в этом и заключается т.к. при работе с открытым файлом Excel решение уже есть)
VBA код из Excel в скрипт GoogleSheets
 
Добрый день,
Есть рабочий VBA код - парсер сайта https://www.tradingview.com/screener/ в заданный интервал и промежуток времени.
Работа с файлом:
1) Открываю файл и запускаю парсер галочкой в чек-боксе на первом листе
2) Согласно настроенному мной в коде интервалу и промежутку времени парсер обновляет информацию, предварительно копируя всю таблицу на второй лист. В полной версии файла количество строк >5к (сократил чтобы поджать файл)
3) При необходимости в коде самостоятельно меняю одну строку с необходимыми мне индикаторами.
Файл отлично работает, но не удобство заключается в том, что в последнее время нет возможности включить компьютер, чтобы запустить файл и держать включенным компьютер. В связи с этим есть необходимость перенести код в скрипт Google таблицы, чтобы также по алгоритму обновлялся, но без открытия файла
P.S. Вопрос "Какой бюджет?" вводит в ступор т.к. не знаю ваших расценок и трудоемкость работы. Просьба лучше вы скажите стоимость работ, чтобы оценить целесообразность выполнения данной работы.
Изменено: puh840 - 06.11.2021 17:50:41
Расчет относительных значений в сводной таблице по фильтрам
 
В связи с необходимостью решения до завтра: кросс
Добрый день, всем участникам форума!
Необходимо реализовать задачку через плоскую таблицу или ...:
Показатель 1 и 2 - абсолютные значения по месяцам, подразделениям и ЕРБ
Показатель 3 - расчетное значение путем деления показателя 1 на показатель 2
Необходимо создать сводную таблицу (!) чтобы можно было выводить показатель 3 (по факту относительных показателей больше) в столбец N чтобы значения по нему считались в зависимости от выбранных срезов (фильтров, в т.ч. должен быть выбор самих показателей).

Данная задача решена через не плоскую таблицу (второй лист). Но в ней не получается вставить срез по показателям, т.к. они расположены в шапке таблицы.

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

Загвоздка в том, что функция DecompressFiles в строке MyData возвращает null.
Попробовал добавить в конце source {0} - в этом случае он видит первый в списке файл, пробовал добавить {0 ... 100} (число 100 условно, т.к. количество файлов может быть любое) - тоже ошибку выдает. Пробовал в конце писать {Список}, [Список] - название таблицы со списком Binary файлов - тоже ошибку выводит.
Подскажите, пожалуйста, как правильно поправить код в запросе "Числа" чтобы отработать несколько файлов в папке.
P.S. второй запрос работает отлично с папкой с файлами.

Текущее решение:
В первой строке кода PQ указываем путь к папке с файлом (!). Со второй строки код полностью взят у Товарища Excel. Во второй строке указана функция по извлечению из файла Excel xml файл. В третьей строке применяется функция и извлекается xml файл. Дальше код извлекает информацию из этого xml файла.
Что необходимо:
При помещении в папку 2-х и более файлов (можно сделать копию файла Апрель, Во вложении первого сообщения) третья строка возвращает null. Т.е. получается функция может извлечь xml файл только из одного файла. Предполагаю, что либо в функции (вторая строка кода) либо в третьей строке кода что-то нужно поменять чтобы можно было отрабатывать несколько файлов.
Что удалось сделать самим:
Промежуточное (не самое удобное) решение удалось сделать второй и третий шаг при помощи батника извлекаем xml файлы из всех файлов в папке.
А хотелось бы найти решение без промежуточных решений. В крайнем случае заменить 2-3 шаг на vba.
Парсер файла (информации) с сайта
 
Кросс: http://www.excelworld.ru/forum/6-47420-1#312088

Добрый вечер, всем участникам форума!
Буду признателен, за разумную плату, помочь написания макроса.
Сайт: https://www.tradingview.com/screener/
По умолчанию можно пользоваться без авторизации, но необходимые настройки скринера и возможность скачивания появляется только после авторизации (авторизован).
Есть необходимость в получении информации которая получается при скачивании файла. Сам файл не нужен, нужно его содержимое в моем файле (можно поместить на пустом листе, например с ячейки C3). Цикличность запроса: каждые 5 минут с 16:30 до 23:00 ежедневно в будние дни.
Если это упростит процесс, можно держать открытым авторизованную страницу.
Пример скачанного файла (усечон из-за ограничений по размеру) и настройки во вложении.
Реализация возможна как в Excel так и в Google Sheets

P.S. Пока делаю этот процесс в ручном режиме скачивая и через PQ получаю информацию в своем файле.
Учет хранения шин
 
Добрый вечер, участникам форума!

Тема - кросс, т.к. решить нужно задачку на этой неделе, не получается найти кто сможет.

Решается прикладная задачка - организация учета хранения шин.
В прилагаемом файле постарался максимально описать текущую задачку. В последующем файл будет возможно незначительно меняться и точно дополняться аналитическими формами (тоже в файле написал красным цветом примерные отчеты).

Последовательность действий текущей задачи (в файле тоже коротко изложил с визуализацией форм):

1. Вначале проверяется наличие свободных мест в форме визуализации склада (по аналогии с формой покупки билетов в кинотеатр). Зеленые свободные, красные - занятые, заливку необходимо сделать автоматическую. Оценки занятости по столбцам "Ряд", "Зона", "Стеллаж". После выдачи со склада шин необходимо чтобы цвет менялся на зеленый. Если будет сложно и/или дорого можно попробовать сделать альтернативный вариант формулами.

2. В идеале после нажатия на свободное (зеленое) место необходимо чтобы открывалась форма "Прием шина на хранения". Заполняются поля, некоторые из выпадающего списка (из листа Списки). После нажатия сохранить - автоматически заполнить строкой в Базе данных. Предусмотреть не возможность закрыть окно пока не все поля будут заполнены.
Возможно ли сделать так, чтобы фотографии сделанной камерой (состояния шин) автоматически прикреплялись определенного размера в ячейки с привязкой к номеру договора (например). Альтернативный вариант пока предусмотрел поле для гиперссылки к папке на сервере с фотографиями.

3. Редактировать скорее всего пока будем в самой Базе данных.

4. Выдача шин со склада производится по такой же форме с нюансом (описал в файле).

Пока так. Потом выходные формы по результатам решения этой задачки.

Буду признателен за помощь в решении данной задачки.
P.S. для ускорения попробую первую часть задпчки решить через УФ в ячейках. Поэтому пока нужно 2-4 этап решить.  
Разрыв связей при экспорте листов в отдельный файл
 
Добрый вечер,

Есть готовый макрос который решает задачу отправки с кнопки заданных в ячейке названий листов, в нужную папку и под нужным именем. Все работает отлично с одним НО - остаются в новом файле связи с исходным файлом.

Помогите, пожалуйста допилить макрос чтобы разрывались связи, но не все значением стало, а только оборвались связи (как делаем обычно вручную: Данные - Изменить связи - Разорвать связи), но только зашить в базовый макрос.
4 строка (.BreakLink...) почему то не срабатывает.
Код
Sub Макрос1()
Dim p: p = Range("B1") & "\" & Range("B2") & ".xlsx"
  Sheets(Split(Range("B3"), "; ")).Copy
  ActiveWorkbook.BreakLink Name:=ThisWorkbook.FullName, Type:=xlExcelLinks
  ActiveWorkbook.SaveAs Filename:=p, FileFormat:=xlOpenXMLWorkbook _
    , CreateBackup:=False, AddToMru:=False
  ActiveWorkbook.Close 0
End Sub
Экспорт нужных листов в отдельный файл с адресом и именем из ячеек
 
Добрый день уважаемые коллеги!

Обращаюсь с просьбой допилить один макрос, который нашел в просторах интернета и наиболее приближен к решению текущей задачи.
В нем только не учтены следующие моменты (помогите, пожалуйста их зашить в существующий макрос):
1) При экспорте листов и сохранении их все формулы и ссылки превращаются в значения. Необходимо чтобы оборвались только связи с этой исходной книгой, а формулы оставить без изменений.
2) В данном макросе указываются конкретные порядковые номера листов для экспорта (с учетом скрытых).
Возможно ли сделать например ссылку на ячейку в которой через , или ; я укажу названия нужных листов?
3) Необходимо сохранить в нужное место (указанное в ячейке), с нужным именем (тоже из ячейки) и заданным расширением (можно в макросе указать, например, *.xlsm)
Нашел такой код, не знаю как прикрутить (пробовал сам, выдает ошибку):
Код
ActiveWorkbook.SaveAs Filename:="C:\Folder\" & Range("b1").Value & " " & Range("b2").Value & ".xlsm"


На сколько решаема данная задачка?
Отображение списка в форме
 
Доброе утро, коллеги!

Помогите, пожалуйста, допилить макрос чтобы после двойного клика по ячейке c3 в появившейся форме в нижней части был виден список с полосой прокрутки
Активация формы
 
Добрый вечер, уважаемые коллеги.

Почти завершил свою задачку. Остались штрихи.

В чем может быть причина если я запускаю форму поиска через кнопку - форма сразу активная для использования, а если запускаю через двойной клик, то сразу не активная форма, нужно вначале нажать за пределы формы, а потом на нее - только после этого она активная становится?
Запуск макроса двойным кликом
 
Подскажите, пожалуйста, как запустить макрос двойным кликом в определенной ячейке определенного листа?
Выпадающий список (по НЕ первым буквам)
 
Добрый вечер, коллеги!

Пользуюсь выпадающим списком с возможностью выбора по первым буквам (во вложении).
Возможно ли сделать также, но не по первым буквам, а по 2-4 буквам, например, имени (внутри текста)?
Увеличение высоты ячеек для слишком длинного текста
 
Добрый вечер, уважаемые коллеги!

Искал, честно искал в просторах интернета и не нашел решения одного вопроса.

В таблице есть ячейки с оооооочень длинным текстом. Оперативно решение нашел (чтобы побыстрому отдать таблицу руководству) путем объединения нескольких ячеек и увеличением высоты на сколько дает Excel. Получилось оооооооооочень долго.

Возможно ли макросом увеличить высоту строчки по максимальному содержимому в любой из ячеек в строках?
Ширину регулируем сами чтобы уместиться в альбомный лист.
Подправить макрос отправки задач из Excel в Outlook - VBA
 
Уважаемые, коллеги! Доброго времени суток!

Уже год как пользуюсь файлом который был выложен в разделе готовые решения "Outlook - создание задач из Excel (Excel)". За что очень благодарен автору.
Используя этот файл появилась уточненная задача:

Во вложении файл с примером отправки задач в Outlook из Excel. После нажатия кнопки Start задача отправляется не только адресату, но и мне в Outlook.

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

С уважением,
Анис
Страницы: 1
Наверх