Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Пользователи » ageres1982
Выбрать дату в календаре…Выбрать дату в календаре

Страницы: 1
Преобразование с поиском максимального в группе
 
#
18.12.2020 09:56:03
Андрей VG Доброго Вам дня.
вот не пойму как эта штука работает в Вашем решении:
List.Transform(sub[#"number"], Number.From)
Смотрю функции
https://docs.microsoft.com/ru-ru/powerquery-m/list-transform
https://docs.microsoft.com/ru-ru/powerquery-m/number-from
и не понимаю как Number.From передаём значения....
если не сложно можете пояснить?
 
Перейти    
PQ самодостаточная транслитерация (таблица соответствия в запросе), PQ транслитерация
 
#
14.12.2020 15:11:46
buchlotnik спасибо большое
 
Перейти    
PQ самодостаточная транслитерация (таблица соответствия в запросе), PQ транслитерация
 
#
11.12.2020 09:03:44
buchlotnik простите возможно не правильно выразился, на самом деле нужна  функция на PQ которая будет самодостаточна для возможности транслитерации в одном направлении рус-eng... думал есть уже готовое решение но видимо плохо искал...  
 
Перейти    
PQ самодостаточная транслитерация (таблица соответствия в запросе), PQ транслитерация
 
#
09.12.2020 10:37:28
Дмитрий(The_Prist) Щербаков Спасибо огромное. Начну с топорного варианта как с самого понятного :)
 
Перейти    
PQ самодостаточная транслитерация (таблица соответствия в запросе), PQ транслитерация
 
#
09.12.2020 09:40:38
Добрый день уважаемые эксперты.
Хотелось бы вернуться к теме описанной в https://www.planetaexcel.ru/forum/index.php?PAGE_NAME=message&FID=1&TID=99310&am...
Можно ли изменить запрос таким образом что бы таблица соответствия была прописать непосредственно в запросе PQ (как бы самодостаточный запрос без обращения к дополнительному столбцу) ? Что то подобное на VBA тут https://www.planetaexcel.ru/forum/index.php?PAGE_NAME=message&FID=8&TID=44100&am...
 
Перейти    
Преобразование с поиском максимального в группе
 
#
06.11.2020 14:06:46
Андрей VG, Максим В., Сергей,buchlotnik
низкий поклон Вам и спасибо огромное.
 
Перейти    
Преобразование с поиском максимального в группе
 
#
06.11.2020 13:26:15
Здравствуйте уважаемые Гуру.

Помогите пжста решить задачу.

Есть таблица на листе source данные в ячейке состоят из 3х букв и 3х цифр(по умолчанию они соединены в буквенно цифровой код),
Буквенно цифровые коды условно можно объединить в группы , где первые 3 буквы остаются постоянными а меняются последние 3 цифры в порядке увеличения.
Нужно на новом листе result получить новую таблицу где для группы  буквенно цифровых кодов будет сформировано следующее по порядку значение.
Наверное не очень понятно написал, простите пожалуйста, но то что должно получиться хорошо видно на приложенном примере.
Изменено: ageres1982 - 06.11.2020 13:26:51
 
Перейти    
VBA. Замена Индекс Поискпоз макросами с использованием формулы, массивов,словаря
 
#
31.07.2020 15:30:04
msi2102 спасибо за ответ, имел ввиду использовать в макросе конструкцию  .Formula = " "  
 
Перейти    
VBA. Замена Индекс Поискпоз макросами с использованием формулы, массивов,словаря
 
#
31.07.2020 11:46:32
Давайте продолжим тему
Не было вариантов макросов с использованием формулы ..
 
Перейти    
VBA. Замена Индекс Поискпоз макросами с использованием формулы, массивов,словаря
 
#
30.07.2020 08:08:20
Андрей VG Просто мне хотелось сделать полезную для всех тему с разными работающими примерами. Действитель спасибо огромное за помощь и ценный совет.
Все кто прочитают подобного рода книгу вряд ли будут задавать такие глупые вопросы как я  :)  
 
Перейти    
VBA. Замена Индекс Поискпоз макросами с использованием формулы, массивов,словаря
 
#
30.07.2020 00:04:04
Hugo - спасибо взял  на заметку, очень полезно ) про PQ не спросил т.к Leftjoin показан в решении Андрей VG
Андрей VG - огромная благодарность Вам за рабочий вариант с sql , единственное хотелось бы уточнить про первый пример с функцией, как в макросе в цикле пробегаясь по столбцу "Что ищем" передавать Вашей Public Function LikeLookup значение текущей ячейки и в соседней ячейке получать результат...
Цитата
Андрей VG - если Вам не сложно не могли бы приложить пример с вызовом функции в макросе.  
 
Перейти    
VBA. Замена Индекс Поискпоз макросами с использованием формулы, массивов,словаря
 
#
29.07.2020 15:14:59
Уважаемые Гуру а как можно решить пример с использованием запроса sql ?
 
Перейти    
VBA. Замена Индекс Поискпоз макросами с использованием формулы, массивов,словаря
 
#
28.07.2020 16:12:07
Андрей VG Андрей_26 БМВ vokilook msi2102 спасибо огромное
 
Перейти    
VBA. Замена Индекс Поискпоз макросами с использованием формулы, массивов,словаря
 
#
28.07.2020 09:38:18
БМВ - sql запросом тоже приветсвуется :) т.к изначально не было ограничения всё зависит от того кто как умеет  см: (c использованием формулы, массивов,словаря ....(кто как умеет) )
 
Перейти    
VBA. Замена Индекс Поискпоз макросами с использованием формулы, массивов,словаря
 
#
28.07.2020 08:50:52
Андрей VG Андрей_26, Спасибо огромное.
Андрей_26  - забыл сказать что "Option Explicit"  поэтому переменные нужно явно прописать, и не отработала  4 строчка Что_ищем_ошибка должно быть ошибка.
Андрей VG - если Вам не сложно не могли бы приложить пример с вызовом функции в макросе.  :)
 
 
Перейти    
VBA. Замена Индекс Поискпоз макросами с использованием формулы, массивов,словаря
 
#
28.07.2020 08:05:20
Добрый день.
Уважаемые Гуру,  научите пжста как получать на листе "Поиск" значение получаемое в столбце "Результат" не формулой, а макросом. (число строк в исходных таблицах не фиксировано, определяем автоматически)
Как понимаю вариантов реализации множество.
Хотелось бы увидеть макросы с использованием формулы, массивов,словаря ....(кто как умеет)  
 
Перейти    
Макрос для поиска и замены текста в ячейках согласно списка
 
#
22.07.2020 16:59:55
Спасибо огромное, теперь всё работает  :)  
 
Перейти    
Макрос для поиска и замены текста в ячейках согласно списка
 
#
22.07.2020 13:17:20
Не работает..
Z_BW_AUTH_AO_YPLANT_3305 - должно остаться без изменения т.к есть в списке исклюения (тут не ок),
а для ZEAD_FI_03_02_D910 должен убраться хвостик _D910 (тут всё ок)
 
Перейти    
Макрос для поиска и замены текста в ячейках согласно списка
 
#
22.07.2020 12:50:53
Спасибо :)
Исключения теперь обходит, а когда нужно сделать замену выдаёт 13 ошибку.
Добавил пример.
 
 
Перейти    
Макрос для поиска и замены текста в ячейках согласно списка
 
#
22.07.2020 10:43:39
Пример
 
Перейти    
Макрос для поиска и замены текста в ячейках согласно списка
 
#
22.07.2020 10:42:38
tolstak
Спасибо огромное.
Вижу в Вашем примере отрабатывает,  переношу в свой - не работает и не понимаю почему.
Может быть дело в _ в исключениях?
Подскажите пжста чтоне так?
 
Перейти    
Макрос для поиска и замены текста в ячейках согласно списка
 
#
22.07.2020 00:36:41
Вопрос к tolstak,  а как в первом варианте делать замену и по условию: т.е если значение ячейки не начинается на Liftinq или на Antistat то замену выполняем , в противном случае оставляем значение ячейки без изменений  
 
Перейти    
PQ Новый пользовательский столбец по условию
 
#
10.04.2020 22:09:11
Спасибо всем огромное.
 
Перейти    
PQ Новый пользовательский столбец по условию
 
#
10.04.2020 14:28:49
Здравствуйте Гуру.

Помогите пожалуйста заполнить в PQ новый пользовательский столбец E2 по условию:
если есть данные в B2 то E2 = B2, если B2 - пусто то E2=C2, если и B2 и С2 пусто то E2=D2,

Заранее благодарю.
 
Перейти    
VBA, определить номер столбца для выделенной ячейки
 
#
21.10.2019 16:37:27
Ура , спасибо.
 
Перейти    
VBA, определить номер столбца для выделенной ячейки
 
#
21.10.2019 14:31:29
Добрый день.

Помогите пжста  переделать макрос.
Сейчас действие выполняется только для столбца "А" - Cells(Rows.Count, "A"),

как сделать так что бы столбец автоматически определялся по текущей выделенной ячейке ?
Код
Option Explicit
Option Compare Text

Sub XXXX()
Dim i%, box As String
     With Sheets(1)
     box = InputBox("Укажите номер БЕ", "_", "1200")
     If box <> "" Then
        For i = 1 To Cells(Rows.Count, "A").End(xlUp).Row
            If (Left(Cells(i, 1), 4) <> "Z_BW") _
            And (Left(Cells(i, 1), 2) <> "Y_") _
            And (Left(Cells(i, 1), 3) <> "ZSA") _
            Then Cells(i, 1) = Cells(i, 1) & "_" & box
        Next
    End If
    End With
End Sub
 
Перейти    
VBA, редактирование каждой не пустой ячейки столбца при условии.
 
#
15.10.2019 09:09:47
Ура, получилось!  :) Спасибо огромное.  
 
Перейти    
VBA, редактирование каждой не пустой ячейки столбца при условии.
 
#
15.10.2019 08:59:04
Цитата
msi2102 написал:
Получите. Бежит по столбцу А и добавляет
Спасибо огромное, а можно это делать в том же стобце где были данные (без дополнительного столбца с результатами) ?
 
Перейти    
VBA, редактирование каждой не пустой ячейки столбца при условии.
 
#
15.10.2019 08:45:37
Спасибо большое, нужно именно на VBA. Дописываем в конец. Спасибо огромное что откликнулись.
 
Перейти    
VBA, редактирование каждой не пустой ячейки столбца при условии.
 
#
15.10.2019 08:18:42
Здравствуйте.
Уважаемые Гуру, помогите пжста с макросом.
Бежим в цикле по столбцу пока ячейка не пустая и выполняем действие (дописываем к значению в ячейке "_1200") если первые 4 символа не равны "Z_BW".
Заранее благодарен.  
Изменено: ageres1982 - 15.10.2019 08:19:33
 
Перейти    
Страницы: 1
Наверх