Экспорт значения НЕ текстовой фигуры в ячейку, Возможен ли экспорт значения НЕ текстовой фигуры в ячейку?
Пользователь
Сообщений: Регистрация: 07.07.2022
12.04.2024 07:46:11
МатросНаЗебре, Доброго дня! - приношу извинения за не оперативный ответ - занимался по другому направлению. Код успешно отработал, снял массу вопросов и большую головную боль! Огромное спасибо!!!!!!!
Экспорт значения НЕ текстовой фигуры в ячейку, Возможен ли экспорт значения НЕ текстовой фигуры в ячейку?
Пользователь
Сообщений: Регистрация: 07.07.2022
10.04.2024 10:39:02
Всем Добрый День! Всё же встал живой вопрос по написанию кода: - Код экспорта значения нескольких фигур в ячейки, расположенные в тех же строках что и фигуры-доноры. То, что должно получиться - схематично в приложенном файле, буду признателен за помощь!
Экспорт значения НЕ текстовой фигуры в ячейку, Возможен ли экспорт значения НЕ текстовой фигуры в ячейку?
Пользователь
Сообщений: Регистрация: 07.07.2022
09.04.2024 17:29:32
МатросНаЗебре, всё отлично работает для обычной, не текстовой фигуры! Вы мой кумир, огромная Вам благодарность!!!
Почему то мне кажется следующей задачей для меня будет - а можно ли после перетаскивания мышкой нескольких прямоугольников одной кнопкой запустить экспорт данных из них в ячейки на против каждого прямоугольника, ну и конечно же я обращусь с таким вопросом к Вам. Как думаете, возможно ли такое?
Экспорт значения НЕ текстовой фигуры в ячейку, Возможен ли экспорт значения НЕ текстовой фигуры в ячейку?
Пользователь
Сообщений: Регистрация: 07.07.2022
09.04.2024 16:31:54
Всем добрый день! Возможен ли экспорт значения НЕ текстовой фигуры в ячейку? - во вложении файл с макросом экспорта значения ячейки в ячейку, расположенную на той же строке, что и фигура. В общем и целом все хорошо, но вот работать с тестовой фигурой очень не удобно, хотелось бы заменить текстовую фигуру на простой "прямоугольник" Сам вопрос: - Как откорректировать код, чтоб экспортировать значение НЕ текстовой фигуры в ячейку? Вопрос для альтернативного решение задачи (если из простой фигуры экспорт не возможен): - Как откорректировать код, чтоб экспортировать значение текстовой фигуры которая не выделена, а просто находится напротив кнопки запуска макроса?
Буду благодарен за ваши мысли и помощь в данном вопросе!
Ушел из жизни Сергей (Serge_007)
Пользователь
Сообщений: Регистрация: 07.07.2022
29.03.2024 10:15:36
Печальное известие. Долгой светлой памяти, искренние соболезнования близким. Верю что душа такого человека обретёт мир и покой.
Возврат данных по значениям из другого столбца, Возврат данных по значениям из другого столбца
Пользователь
Сообщений: Регистрация: 07.07.2022
23.03.2024 15:30:05
Цитата
PfH написал: Через фильтр собираются данные как за январь, так и за февраль, а нужно, чтобы только за февраль собирались данные.
Самый простой, "разовый" (НЕ универсальный) способ - изменить область охвата формулы. Если со временем Вам потребуется анализировать другой месяц - придется корректировать формулу. Приложенный файл, лист - Лист1 (2).
Возврат данных по значениям из другого столбца, Возврат данных по значениям из другого столбца
Пользователь
Сообщений: Регистрация: 07.07.2022
23.03.2024 14:31:16
Добрый день! Посмотрите файл, можно сделать через функцию "фильтр" если эксель поддерживает функции динамических массивов.
Cломался код VBA, Не понятные символы в коде, по неизвестным причинам.
Пользователь
Сообщений: Регистрация: 07.07.2022
14.02.2024 10:05:29
Цитата
Jack Famous написал: так, МОЖЕТ потому и не нашли, что каждый такой пишет "Сломался код VBA"?Глядишь, если написать "VBA. Строки кода самопроизвольно изменились(кракозябры)", то ВОЗМОЖНО, другой человек с ТАКОЙ проблемой нашёл бы вашу тему и ему не пришлось бы создавать ещё одну "Сломался код VBA/Проблемы VBA/Помогите/Что делать" и так далее — абсолютно не идентифицирующее …
Вы как всегда правы, именно так и буду поступать, спасибо! что не теряете надежды вразумить неучей без мата.
Cломался код VBA, Не понятные символы в коде, по неизвестным причинам.
Искал и нашел огромное количество - здесь, в Ютуб и на просторах сети. Масса проблем и их решения обсуждаются. Но чтоб однозначно такие вот симптомы как у меня - не нашёл, возможно не качественно искал. Приношу извинения всем коллегам, кому своими действиями расшатал дискомфорт.
Cломался код VBA, Не понятные символы в коде, по неизвестным причинам.
Пользователь
Сообщений: Регистрация: 07.07.2022
14.02.2024 09:20:33
Цитата
evgeniygeo написал: Данные -> Получить данные -> Параметры запроса -> Конфиденциальность -> Всегда игнорировать параметры ...
Благодарю!
Cломался код VBA, Не понятные символы в коде, по неизвестным причинам.
Пользователь
Сообщений: Регистрация: 07.07.2022
13.02.2024 10:10:13
Еще есть вопрсик и не хочется заводить из-за него отдельную тему. К сообщению прикреплена картинка - это окошко выскакивает при обновлении запроса PQ. Задрало уже... как избавиться?
Различные манипуляции с галочками и выпадающим списком в самом окне - результатов не дали. Вернее результат есть, если файлом пользуется один человек, но как только файл открывают на другой машине - сообщение выскакивает заново.
Изменено: - 13.02.2024 10:13:02
Cломался код VBA, Не понятные символы в коде, по неизвестным причинам.
Пользователь
Сообщений: Регистрация: 07.07.2022
13.02.2024 09:08:31
Цитата
Дмитрий(The_Prist) Щербаков написал: Никак не починить. Почти уверен, что этот файл открывался на ПК под управлением MAC OS. Она такие бяки в коде с русскими символами делает.
Дмитрий, благодарю за подсказку! неудобно получилось, реагирую с запозданием, у нас тут в Ростовской области локальный армагеддон случился с обледенением, порывом проводов, падением деревьев и прочими подобными радостями..
По поводу MAC OS - действительно, завелось три таких машины, блин, вывести не можем... По мимо этой ситуации были и ещё проблемы с маками - после входа в папки общего доступа заводской сети, эти порченые с одной стороны яблоки, оставляют скрытые файлы ".DS_Store" - о них спотыкаются запросы PQ. Сама по себе, эта проблема, решилась довольно просто - доп. фильтры наименования файлов всё решили, но вот выявить сам факт влияния, и то что в проводнике эти файлы видны только после включения "показывать скрытые файлы" - это потребовало времени. И самое гадкое - последние модификации оси не позволяют пользоваться макросами с этих машин, рубит на входе.
Cломался код VBA, Не понятные символы в коде, по неизвестным причинам.
Пользователь
Сообщений: Регистрация: 07.07.2022
09.02.2024 13:52:05
Добрый день! Подскажите, если кто в курсе:
Сегодня обратились с проблемой - не работает макрос обновления данных (код открывает файл в сети копирует умную таблицу целиком и вставляет значениями в таблицу в файле из которого запускается макрос).
Открыл макросы и обнаружил в коде непонятные символы (картинку прилагаю). Собственно, поправил все в течении 15 минут, а вот осадочек остался... потому, что не понимаю причин сбоя и не знаю ждать ли таких кульбитов в будушем.
Буду благодарен за ваши мысли по причинам такой ситуации.
В обведенной области изначально было написано: "Ежедневн Ост Текущ"
Изменено: - 09.02.2024 13:54:03
Запрос Power Query изменение наименования столбца в исходных файлах, Коррекций запроса при изменении наименования столбца в исходных файлах
Все исправил, но какая-то непонятность начала быть. После нажатия "обновить" открывается файл-источник. Процесс обновления увеличивается по времени кратно. В конце выбивает ошибку.
кароче снёс всё на нах, переделал запрос полностью, теперь работает, радует... Собираюсь по этому поводу как следует отобедать
Парни, благодарю за участие!
Запрос Power Query изменение наименования столбца в исходных файлах, Коррекций запроса при изменении наименования столбца в исходных файлах
Пользователь
Сообщений: Регистрация: 07.07.2022
08.02.2024 10:45:23
Цитата
Maximich написал: Т.е. Вас не смущает, что желающие Вам помочь не видят Вашего запроса?
Вероятно я не понимаю что надлежит видеть. У меня запрос на сборку нескольких одинаковых таблиц в одну. Исходные таблицы находятся в разных файлах. Во всех этих файлах один из столбцов таблицы переименовали. Запрос при обновлении стал выдавать ошибку.
В запросе есть функция, у которой есть сопровождающая надпись "Только подключение", код в расширенном редакторе:
Код
(filename)=>
let
Источник = Excel.Workbook(File.Contents(filename), null, true),
План_Производства1 = Источник{[Name="План_Производства"]}[Data],
#"Удаленные столбцы" = Table.RemoveColumns(План_Производства1,{"Column1"}),
#"Строки с примененным фильтром" = Table.SelectRows(#"Удаленные столбцы", each ([Column10] <> null and [Column10] <> "" and [Column10] <> "0")),
#"Повышенные заголовки" = Table.PromoteHeaders(#"Строки с примененным фильтром", [PromoteAllScalars=true]),
#"Измененный тип" = Table.TransformColumnTypes(#"Повышенные заголовки",{{"Дата начала работ", type text}, {"Дилер", type text}, {"Заявка № стандартный", type text}, {"Заявка №", type text}, {"Контрагент", type text}, {"Примечание (размер, вид и т.д.)", type text}, {"Длина БК, м.", type number}, {"ПЛАН (м/п./день)", type number}, {"1_Этап", type text}, {"2_Этап", type text}, {"3_Этап", type text}, {"4_Этап", type text}, {"Перегородки", type text}, {"Сантехника", type text}, {"Окна", type text}, {"Двери", type text}, {"Эл-ка", type text}, {"Мет. констр.", type text}, {"Готовность_ФАКТ", type text}, {"Отгрузка_ФАКТ", type text}, {"Категория сложности", type text}, {"Суток производства", type text}, {"Коорректировка, суток", type text}, {"Расчетная Дата готовности БК", type text}, {"Column25", type text}, {"Column26", type text}})
in
#"Измененный тип"
Далее идёт сам запрос на основе этой функции, код:
Код
let
Источник = Folder.Files("\\192.168.2.2\производство\Производство БК\ПЛАН РАБОТ+Факт произ-ва"),
#"Строки с примененным фильтром" = Table.SelectRows(Источник, each ([Extension] = ".xlsb")),
#"Строки с примененным фильтром1" = Table.SelectRows(#"Строки с примененным фильтром", each Text.Contains([Name], "План_производства")),
#"Удаленные столбцы" = Table.RemoveColumns(#"Строки с примененным фильтром1",{"Extension", "Date accessed", "Date modified", "Date created", "Attributes", "Content"}),
#"Переупорядоченные столбцы" = Table.ReorderColumns(#"Удаленные столбцы",{"Folder Path", "Name"}),
#"Добавлен пользовательский объект" = Table.AddColumn(#"Переупорядоченные столбцы", "Пользовательский", each План_Производства([Folder Path]&[Name])),
#"Развернутый элемент Пользовательский" = Table.ExpandTableColumn(#"Добавлен пользовательский объект", "Пользовательский", {"Дата начала работ", "Дилер", "Заявка № стандартный", "Заявка №", "Контрагент", "Примечание (размер, вид и т.д.)", "Длина БК, м.", "ПЛАН (м/п./день)", "1_Этап", "2_Этап", "3_Этап", "4_Этап", "Перегородки", "Сантехника", "Окна", "Двери", "Эл-ка", "Мет. констр.", "Готовность_ФАКТ", "Отгрузка_ФАКТ", "Категория сложности", "Суток производства", "Коорректировка, суток", "Расчетная Дата готовности БК", "Column25", "Column26"}, {"Дата начала работ", "Дилер", "Заявка № стандартный", "Заявка №", "Контрагент", "Примечание (размер, вид и т.д.)", "Длина БК, м.", "ПЛАН (м/п./день)", "1_Этап", "2_Этап", "3_Этап", "4_Этап", "Перегородки", "Сантехника", "Окна", "Двери", "Эл-ка", "Мет. констр.", "Готовность_ФАКТ", "Отгрузка_ФАКТ", "Категория сложности", "Суток производства", "Коорректировка, суток", "Расчетная Дата готовности БК", "Column25", "Column26"}),
#"Измененный тип" = Table.TransformColumnTypes(#"Развернутый элемент Пользовательский",{{"Расчетная Дата готовности БК", type date}, {"1_Этап", type date}})
in
#"Измененный тип"
В исходных таблицах (во всех без исключения) изменили наименование одного столбца: Было: Заявка № стандартный Стало: Заявка № стандартный + Вагон/Вагонов
Описал что только смог, может чего ни так, в таком случае прошу вместо порицания подсказки.
Запрос Power Query изменение наименования столбца в исходных файлах, Коррекций запроса при изменении наименования столбца в исходных файлах
Пользователь
Сообщений: Регистрация: 07.07.2022
08.02.2024 10:23:09
Всем добрый день! Подскажите пожалуйста, как и где откорректировать запрос PQ (сборка одинаковых таблиц из разных файлов в одну таблицу) при изменении наименования столбца в исходных файлах. Наименование столбцов заменены во всех исходных файлах (таблицах).
Изменено: - 08.02.2024 10:25:22
Дата, время, имя компьютера при обновлении таблиц, Получить дату и время обновления таблиц, а также имя компьютера с которого запускалось обновление
Пользователь
Сообщений: Регистрация: 07.07.2022
30.01.2024 08:33:58
AlienSx, Доброе день! Подскажите, если я пользуюсь для вытягивания имени в VBA таким вот кодом:
Код нормально работает и на ряду с ошибкой в PQ (Power Query) даёт правильный результат на других листах, где таблицы обновляются макросами.
Можно ли использовать этот принцип получения имени компа в настраиваемом столбце PQ?
В принципе задачу уже решил - сделал запуск обновления сборки PQ через макрос, в этот же макрос вставил код который вытаскивает в ячейку "D18" имя компа. Но ведь хочется совершенства...
Изменено: - 30.01.2024 10:09:00
Дата, время, имя компьютера при обновлении таблиц, Получить дату и время обновления таблиц, а также имя компьютера с которого запускалось обновление
Дата, время, имя компьютера при обновлении таблиц, Получить дату и время обновления таблиц, а также имя компьютера с которого запускалось обновление
Пользователь
Сообщений: Регистрация: 07.07.2022
29.01.2024 16:52:03
Цитата
AlienSx написал: попробуйте такой вариантКодTable.Max(Folder.Contents("C:\Users"), "Date modified")[Name]
Э.... рано возрадовался, возгордился, и был жестоко приземлён...
Вобщем, такая вот ситуёвина: До сегодняшнего дня всё было более или менее понятно, но сегодня кто бы не запустил обновление (проверены три пользователя) - у всех выбивает абсолютно одинаковое имя.
Возможно ли переписать данный код всё же на имя компа, а не на имя пользователя в сети?
Адрес данных для сборки Power Query из внешнего источника, Источник данных для сборки Power Query из ячейки.
Пользователь
Сообщений: Регистрация: 07.07.2022
26.01.2024 13:50:38
Цитата
AlienSx написал: баг. Лечится включением режима bb сode.
Адрес данных для сборки Power Query из внешнего источника, Источник данных для сборки Power Query из ячейки.
Пользователь
Сообщений: Регистрация: 07.07.2022
26.01.2024 10:52:54
Цитата
написал: можно отключить фоновое обновление для всех запросов, тогда файл будет "подвисать" в процессе обновления.
хм... а почему при цитировании теряется имя цитируемого. Ведь на форме ввода оно есть, а потом в сообщении его уже нету..
Адрес данных для сборки Power Query из внешнего источника, Источник данных для сборки Power Query из ячейки.
Пользователь
Сообщений: Регистрация: 07.07.2022
26.01.2024 10:50:29
Цитата
написал: Олег Ирхин , можно отключить фоновое обновление для всех запросов, тогда файл будет "подвисать" в процессе обновления.
Да, да, так и произошло. Ваше сообщение увидел только после отправки своего.
Адрес данных для сборки Power Query из внешнего источника, Источник данных для сборки Power Query из ячейки.
Пользователь
Сообщений: Регистрация: 07.07.2022
26.01.2024 10:48:43
На этот раз всё оказалось довольно просто. У меня в коде имеется строка - вернуться на титульный лист после срабатывания всех обновлений. Сборка PQ - последнее обновление. После отключения в запросе PQ галочки "обновлять в фоне", процесс просто зависает на листе с таблицей PQ (у меня это около15 сек.) ни чего не даёт делать и крутится всем привычное синее колёсико. После окончания обновления сборки, срабатывает код возврата на страницу с кнопкой запуска. Ну и я не стал заморачиваться и информационными боксами, и так всё предельно ясно и понятно.
Ещё раз огромное спасибо всем поучаствовавшим в обсуждении! Задача выполнена и сдана горячо любимому руководству!!
Адрес данных для сборки Power Query из внешнего источника, Источник данных для сборки Power Query из ячейки.
Пользователь
Сообщений: Регистрация: 07.07.2022
26.01.2024 09:57:15
Цитата
написал: Здесь пример кода можно найти: Как дождаться обновления выполнения запроса
Благодарю! Пойду знакомиться
Адрес данных для сборки Power Query из внешнего источника, Источник данных для сборки Power Query из ячейки.
Пользователь
Сообщений: Регистрация: 07.07.2022
26.01.2024 08:37:39
Парни, всех благодарю! Сегодня в ночь свершилось чудо - всё заработало! Что смог: одна кнопка запускает все макросы, затем все PQ сборки.
Одно только гложет - нет внятного критерия окончания обновления PQ. Пользователь видит перед собой титульный лист отчета с цифрами, в самом низу экрана отображается "Фоновый запрос" - процесс обновления PQ - но кто на это смотрит... Этот процесс продолжается минуту-две, и только потом цифры в отчете приобретают окончательный вид. А за пару минут, мой директор со своей тонкой душевной организацией, глядя на убытки в пару-тройку миллионов может сделать/натворить удивительно много...
Собственно вопрос - можно ли получить каким-то образом информацию об окончании обновления PQ, после чего вывести на экран месседж бокс "Обновление закончено". Ну а перед этим иметь на экране бокс "Думайте о светлом, добром, вечном"
Адрес данных для сборки Power Query из внешнего источника, Источник данных для сборки Power Query из ячейки.
Адрес данных для сборки Power Query из внешнего источника, Источник данных для сборки Power Query из ячейки.
Пользователь
Сообщений: Регистрация: 07.07.2022
25.01.2024 10:31:02
Цитата
написал: "Обновить всё" на вкладке Данные (Data - Refresh All) у вас отсутствует?
Да ту дело такое - этот файл - отчёт. Чтоб отчет собрался нужно обновить 7 листов. 5 листов это импорт данных из одиночных файлов, с таблицами разной конфигурации, реализовано макросами. 2 файла - это сборки Power Query.
На сейчас задача такая - на титульном листе иметь семь кнопок обновления (для каждого листа отдельно). На каждом лист ессно дело иметь отображение когда и кто крайний раз обновлял. С макросами разобрался уже, вот дело дошло до сборок PQ.
Чую следующее задание будет сделать одну кнопку для всего, и ни каких отговорок, что можно пойти, нажать "Данные", потом выбрать "Обновить всё"..
Адрес данных для сборки Power Query из внешнего источника, Источник данных для сборки Power Query из ячейки.
Пользователь
Сообщений: Регистрация: 07.07.2022
25.01.2024 10:09:58
Парни, спасибо!!!!!!! Разобрался.
С этим разобрался, но разбранила меня моя старуха, не дает старику мне покою: Дурачина ты говорит, простофиля. Что толку от внешней подачи адреса источника данных, коли нет у тебя кнопочки "Обновить" и надобно лазать опять в тьму беспросветную, дабы обновление запустить...
Адрес данных для сборки Power Query из внешнего источника, Источник данных для сборки Power Query из ячейки.
Пользователь
Сообщений: Регистрация: 07.07.2022
25.01.2024 09:37:41
Добрый день! Поставлена задача сделать так, чтоб источник данных (адрес папки в сети) для сборки Power Query можно было прописывать в ячейке листа, не открывая диалогового окна запроса. Возможно ли это в принципе?
"МенеджерА" настолько низкой квалификации, что даже в такой несложной операции, как изменение адреса в шаге "Источник", умудряются накосячить напрочь, да так, что на голову не оденешь...
Дата, время, имя компьютера при обновлении таблиц, Получить дату и время обновления таблиц, а также имя компьютера с которого запускалось обновление
Пользователь
Сообщений: Регистрация: 07.07.2022
22.01.2024 16:13:35
Цитата
написал: Олег Ирхин , попробуйте такой вариантКодTable.Max(Folder.Contents("C:\Users\"), "Date modified")[Name]