Поиск  Пользователи  Правила 
Закрыть
Логин:
Пароль:
Забыли свой пароль?
Регистрация
Войти
 
Выбрать дату в календареВыбрать дату в календаре

Страницы: 1 2 След.
Поиск и подстветка дубликатов в столбце (Не всегда 100% совпадение)
 
Anchoret, да
Поиск и подстветка дубликатов в столбце (Не всегда 100% совпадение)
 
Добрый день на текущий момент использую вот такой макрос
Скрытый текст
Оставил только 1 цвет специально.
Но этот макрос выделяет только 100% совпадение.
А мне нужно и приблизительное, например
Абзалов   Д Ф
Абзалов Даян Фазыльянович   10.03.1939
Совпадают Инициалы.
Абышева   Дилбара Дуишенбиковна 31.01.1985
Абышева Дилбара Дуйшенбековна   31.01.1985
Разница в Отчестве Й и И.
(во вложении пример и пояснения)

Помогите доработать макрос. или может это можно сделать другими инструментами?
В реальном файле более 200тыс строк. быстродействие не особо важно. даже если будет минут 15-20 сверять.

Попробовал сделать Fuzzylockup но почему то не получилось.
Изменено: Wild.Godlike - 18 Фев 2019 15:37:57
Удаление строк в PQ если данные есть из всех столбцов только в столбце NAME
 
PooHkrd, большое спасибо :) Вопрос решен.
Удаление строк в PQ если данные есть из всех столбцов только в столбце NAME
 
PooHkrd,  Не совсем понимаю куда вставить этот код именно в этом запросе.

Код
let
    Source = Folder.Files("U:\Воркутинский офис продаж и обслуживания клиентов (ОПиОК)\Журналы"),
    Filtered = Table.SelectRows(Source, each not Text.StartsWith([Name], "~$") and [Name] <> "1. ОТЧЕТ ТКО.xlsx"),
    Pages = Table.AddColumn(Filtered, "Data", each Excel.Workbook(File.Contents([Folder Path]&[Name]), null, true)),
    Loaded = Table.TransformColumns
               (
                Pages, 
                  {
                   "Data", 
                   (Row) =>
//                   Table.Combine(
                         List.Accumulate
                          (
                           {2018..2019},
                           {},
                           (acc, this) => acc & (try {Table.PromoteHeaders(Row{[Item=Text.From(this), Kind="Sheet"]}[Data])} otherwise {})
                           )
//                      )
                }
               ),
    Expanded = Table.ExpandListColumn(Loaded, "Data"),
    #"Удаленные столбцы" = Table.RemoveColumns(Expanded,{"Content", "Extension", "Date accessed", "Date modified", "Date created", "Attributes", "Folder Path"}),
    #"Развернутый элемент Data" = Table.ExpandTableColumn(#"Удаленные столбцы", "Data", {"№", "Статус", "Когда принято", "ФИО", "Улица", "Дом", "Кв.", "Причина", "Дата обработки", "Где находится", "Примечание", "БДФЛ"}, {"№", "Статус", "Когда принято", "ФИО", "Улица", "Дом", "Кв.", "Причина", "Дата обработки", "Где находится", "Примечание", "БДФЛ"}),
    #"Измененный тип" = Table.TransformColumnTypes(#"Развернутый элемент Data",{{"Когда принято", type date}, {"Дата обработки", type date}, {"Name", type text}, {"№", type text}, {"Статус", type text}, {"ФИО", type text}, {"Улица", type text}, {"Дом", type text}, {"Кв.", type text}, {"Где находится", type text}, {"Примечание", type text}, {"БДФЛ", type text}}),
    #"Обрезанный текст" = Table.TransformColumns(Table.TransformColumnTypes(#"Измененный тип", {{"Когда принято", type text}, {"Дата обработки", type text}}, "ru-RU"),{{"Name", Text.Trim, type text}, {"№", Text.Trim, type text}, {"Статус", Text.Trim, type text}, {"Когда принято", Text.Trim, type text}, {"ФИО", Text.Trim, type text}, {"Улица", Text.Trim, type text}, {"Дом", Text.Trim, type text}, {"Кв.", Text.Trim, type text}, {"Причина", Text.Trim, type text}, {"Дата обработки", Text.Trim, type text}, {"Где находится", Text.Trim, type text}, {"Примечание", Text.Trim, type text}, {"БДФЛ", Text.Trim, type text}}),
    #"Текст в верхнем регистре" = Table.TransformColumns(#"Обрезанный текст",{{"БДФЛ", Text.Upper, type text}, {"Примечание", Text.Upper, type text}, {"Где находится", Text.Upper, type text}, {"Дата обработки", Text.Upper, type text}, {"Причина", Text.Upper, type text}, {"Кв.", Text.Upper, type text}, {"Дом", Text.Upper, type text}, {"Улица", Text.Upper, type text}, {"ФИО", Text.Upper, type text}, {"Когда принято", Text.Upper, type text}, {"Статус", Text.Upper, type text}, {"Name", Text.Upper, type text}}),
    #"Удалены пустые строки" = Table.SelectRows(#"Текст в верхнем регистре", each not List.IsEmpty(List.RemoveMatchingItems(Record.FieldValues(_), {"", null})))
in
    #"Удалены пустые строки"
Изменено: Wild.Godlike - 13 Фев 2019 16:48:36
Удаление строк в PQ если данные есть из всех столбцов только в столбце NAME
 
Александр, Собрал в один файл.
Удаление строк в PQ если данные есть из всех столбцов только в столбце NAME
 
День добрый! ранее на этом форуме мне помогли объединить данные с нескольких файлов и листов эксель тыц  

Воспользовался идеей Alexey_Spb, и немного подправленым вариантом Максим Зеленский.(см. вложение)

Вопрос вот в чём. в запросе я удаляю пустые строки(см. вложение). но они не удаляются т.к. в первом столбце NAME содержится данные а во всех остальных столбцах пусто
Как сделать так чтобы если данные есть только в столбце NAME а во всех остальных столбцах на строке пусто, этих строк не было бы.

ПРЕМЕР 621,622,623 СТРОКА норм (т.к. данные есть во втором столбце) а последующие строки 624-1309 лишние. как такое убирать.

P.S возможно название темы не будет подходить под предложение решение. и я что то не так понимаю.
Расчет времени работников по данным турникетов
 
denzzkyy, Утричко,
1)ФИО-------Дата ------Время------наименование турникета------действие(вход)--------локация турникета(разные офисы)
2)ФИО-------Дата ------Время------наименование турникета------действие(выход)--------локация турникета(разные офисы)
3)файл пример
4)Сводная
Собрать данные с листов 2018/2019 в нескольких файлах через PQ с доп столбцом имя файла.
 
В общем сделал вот так, оказалось проблемсы были из за того что в некоторых файлах нет листа 2019 т.к.(например сотрудник больше не работает откуда там появится листу 2019) сделал 2 отдельных запроса и один общий. Думаю пока что и так сойдёт, хотя может можно как то слепить всё в одно)
Может кому то понадобится.

ВСЕМ СПАСИБО :)

P.S. В запросе 2019 я просто отфильтровал тех у кого нет этого листа в списке, скажем так жосткая привязка )
Изменено: Wild.Godlike - 22 Янв 2019 18:01:24
Собрать данные с листов 2018/2019 в нескольких файлах через PQ с доп столбцом имя файла.
 
Перепроверю ещё раз всё и отпишусь.
Изменено: Wild.Godlike - 22 Янв 2019 14:52:43
Собрать данные с листов 2018/2019 в нескольких файлах через PQ с доп столбцом имя файла.
 
Alexey_Spb,Загрузил почему то только 18 строчек из первого файла и то не доконца.
Собрать данные с листов 2018/2019 в нескольких файлах через PQ с доп столбцом имя файла.
 
Alexey_Spb,Сделал такая же ошибка.....ключу не соответствует (
Собрать данные с листов 2018/2019 в нескольких файлах через PQ с доп столбцом имя файла.
 
Максим Зеленский, Alexey_Spb,

Изменил путь из сообщения №9
Т.к. папка сетевая и с файлами работают в режиме реального времени(как писал в первом сообщении) есть временные файлы в этой же папке которые вызывают ошибку. (чтобы отсечь ненужные файлы для обработки)
добавляю пользовательский столбец с формулой( 123 скришот)
Код
=Excel.Workbook([Content])
Далее в этом столбце удаляю ошибки Error и удаляю столбец.
оставляю всё как вы делали ( 321 скриншот)
в итоге при загрузке ошибка ( 111 скришот)
Файлик прикрепил, может я что-то не так адаптировал (

Вы следить за размером вложения будете? [МОДЕРАТОР]
Изменено: Wild.Godlike - 22 Янв 2019 13:50:19
Собрать данные с листов 2018/2019 в нескольких файлах через PQ с доп столбцом имя файла.
 
Alexey_Spb,не понимаю почему в вашем запросе jr только подключение.
Собрать данные с листов 2018/2019 в нескольких файлах через PQ с доп столбцом имя файла.
 
Alexey_Spb,не получается адаптировать под свою таблицу ( уже и путь поменял к источнику в вашем файле всё равно. сложно с английским (
PooHkrd, постарался сделать так же каки вы в итоге вот такие вот ошибки.
Собрать данные с листов 2018/2019 в нескольких файлах через PQ с доп столбцом имя файла.
 
Alexey_Spb,Спасибо это помогло, а что надо сделать чтобы данные собирались не только с листа 2018 но и с листа 2019.
Собрать данные с листов 2018/2019 в нескольких файлах через PQ с доп столбцом имя файла.
 
Alexey_Spb, Здравствуйте, прикрепил к первому сообщению.
Собрать данные с листов 2018/2019 в нескольких файлах через PQ с доп столбцом имя файла.
 
Добрый день. Есть журналы специалистов которые находятся на сетевом диске. которые заполняются в режиме реального времени во время приёма клиентов. хочу с помощью PQ собирать данные со всех файлов в этой папке. с листов 2018 и 2019 в каждом файле и на основе этих данных уже заниматься анализом.
Вроде бы получилось сделать что-бы собирал все данные из всех файлов.
но не получается добавить в таблицу столбец из какого файла скажем так строка. файл = фио специалиста.
и берёт данные из всех файлов либо с листа 2018 либо с листа 2019 а надо и с того и с другого.

Структура во всех файлах одинаковая по листу ( 2018 и 2019) так же кол-во и названия столбцов одинаковые.

Прикладываю файл. попытался сам сделать. но что-то не получилось. может подскажите как быть. PQ использую всего неделю.
для того чтобы сделать использовал статьи эту и эту
Изменено: Wild.Godlike - 22 Янв 2019 13:51:12
сравнение текстов на подобие (английский и русский)
 
кателоб,Fuzzy lookup Читаем тут , скачиваем тут , используем гугл транслей как подсказал товарищ злипсе, из поста #9.
Сравнение в PLEX не подойдёт т.к. там сравнивается 100% совпадение.
Сопоставление телефонных номеров разного формата
 
Nikitin1,  Посмотрите в сторону вот этой надстройки.Fuzzy loockup
Изменено: Wild.Godlike - 28 Дек 2018 16:41:57
Заполнение и создание файла PDF по шаблону
 
Денис Пожидаев, Думаю надо бы на лист база ещё пару строк добавить. а существу поставленного вопроса, ответ ДА МОЖНО :)
Поиск уникальных значений по условию
 
Homavi,Сами то пытались решить проблему? Посмотрите вот это https://www.planetaexcel.ru/techniques/2/81/

Пока писал) уже ответили.
Изменено: Wild.Godlike - 10 Дек 2018 12:10:05
Преобразование исходных данных в нужный вид.
 
Ответил работаем
Работа выполнена, оплачено. Результатом доволен. Человек знает своё дело. 10 из 10
Изменено: Wild.Godlike - 6 Дек 2018 16:30:24
Преобразование исходных данных в нужный вид.
 
Ігор Гончаренко,попытался более внятно объяснить подредактировал первое сообщение.
Преобразование исходных данных в нужный вид.
 
Юрий М, Вечер добрый. Да перенесите пожалуйста :)

Подредактировал первое сообщение чтобы правилам ветки работа соответствовало.
Изменено: Wild.Godlike - 5 Дек 2018 22:50:04
Преобразование исходных данных в нужный вид.
 
День добрый!
Есть лист Sheet1(реальный формат данных), Лист ИТОГ что хотим получить.
На листре Sheet1 Есть 2 таблицы (ячейки в реальном формате объединены по этому буду писать как имеется в реальном формате)
(1 таблица) Начинается всегда с " Сводная информация о задолженности в разрезе лицевых счетов" Q3:AC3 данное положение никогда не меняется
И заканчивается  "Сальдо" AD29:AF29 данное положение всегда разное в зависимости от того сколько лицевых счетов.
(2 таблица) начинается с "Неоплаченые счета" B31:AC31 Всегда через строчку после 1 таблицы
И заканчивается "Итого:" F100:J100 в зависимости от колличества строчек.
В этой таблице ориентируемся на столбец с названием "ДАТА" B34
Если даты одинаковые эти строки надо сложить и получить сумму
А так же проставляем в столбец "Номер счета и период" Дату на основании столбца дата -1 месяц
тут у нас 01.06.2015 значит в столбец "Номер счета и период" пишем Май 2015(именно такой формат)
если дата выпадает с 20 по 31 число месяца например 25.06.2015 то было Июнь 2015

ДАТА            Номер счета и период                                          сумма       оплаты     долга
01.06.2015Не включено в счет  (Приемник перемещения)3 142,651 288,751 853,90
01.06.2015Не включено в счет  (Приемник перемещения)3,583,090,49
Получем
01.06.2015Май 20153 146,231 291,841 854,39
То есть оставляем только 1 строчку по этой дате с суммой всех остальных строчек с такой же датой остальные удаляемНу и когда это всё сделали приводим таблицу в красивый вид как на листе ИТОГ
Собственно вопрос может ли кто-то то перенести всё действо в макрос?
С формулами дружу более менее а вот с VBA вообще ни как.



Бютжет ориентировочно 500р. честно не знаю сколько стоит такое.(но больше 1000 не смогу оплатить)

P.S. время у меня по МСК (это на всякий случай если сразу не отвечу)
Изменено: Wild.Godlike - 6 Дек 2018 08:05:15
Доработать макрос сравнения нескольких столбцов с несколькими столбцами., Сравнение столбцов
 
chep-kep,Посмотрите это. Может понравится больше чем макрос
Поиск ИД договора, По нескольким условиям
 
БМВ,  :) Спасибо, будем осваивать.
Поиск ИД договора, По нескольким условиям
 
БМВ, Спасибо большое :) Если не трудно, и есть время. не могли бы расписать формулу. как и что..... вроде одно кажется просто условие добавляется (как я думал к ВПР) чтобы в интервал дат попадало....а тут такая формула ещё и массивная.
Изменено: Wild.Godlike - 26 Ноя 2018 13:53:34
Поиск ИД договора, По нескольким условиям
 
День добрый.

Как ищу:
Столбец О на листе 1 = столбец А на листе 2
Далее смотрю чтобы дата из столбца L на листе 1 попадала в период столбцов C:D на листе 2 этот ИД и беру.

P.S.
Если бы не условие что ИД нужно брать тот который попадает подает в интервал дат C:D, сделал бы простым ВПР....
Код
=ВПР(O7;'2'!A:E;3;0) 
Но нужно найти не просто первый попавшийся ИД.

Более подробно во вложении.
После появления данных в одних ячейках производить расчет и заносить даные в другие (пустые и без формул) ячейки
 
garysanders, Если правильно вас понял решение формулой
Код
=ЕСЛИ(НЕ(ЕПУСТО($L24));(((($L24+10800)/60)/60)/24)+ДАТА(1970;1;1);"")
Страницы: 1 2 След.
Наверх