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

Страницы: 1
PQ самодостаточная транслитерация (таблица соответствия в запросе), PQ транслитерация
 
Добрый день уважаемые эксперты.
Хотелось бы вернуться к теме описанной в 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...
Преобразование с поиском максимального в группе
 
Здравствуйте уважаемые Гуру.

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

Есть таблица на листе source данные в ячейке состоят из 3х букв и 3х цифр(по умолчанию они соединены в буквенно цифровой код),
Буквенно цифровые коды условно можно объединить в группы , где первые 3 буквы остаются постоянными а меняются последние 3 цифры в порядке увеличения.
Нужно на новом листе result получить новую таблицу где для группы  буквенно цифровых кодов будет сформировано следующее по порядку значение.
Наверное не очень понятно написал, простите пожалуйста, но то что должно получиться хорошо видно на приложенном примере.
Изменено: ageres1982 - 06.11.2020 13:26:51
VBA. Замена Индекс Поискпоз макросами с использованием формулы, массивов,словаря
 
Добрый день.
Уважаемые Гуру,  научите пжста как получать на листе "Поиск" значение получаемое в столбце "Результат" не формулой, а макросом. (число строк в исходных таблицах не фиксировано, определяем автоматически)
Как понимаю вариантов реализации множество.
Хотелось бы увидеть макросы с использованием формулы, массивов,словаря ....(кто как умеет)  
PQ Новый пользовательский столбец по условию
 
Здравствуйте Гуру.

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

Заранее благодарю.
VBA, определить номер столбца для выделенной ячейки
 
Добрый день.

Помогите пжста  переделать макрос.
Сейчас действие выполняется только для столбца "А" - 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, редактирование каждой не пустой ячейки столбца при условии.
 
Здравствуйте.
Уважаемые Гуру, помогите пжста с макросом.
Бежим в цикле по столбцу пока ячейка не пустая и выполняем действие (дописываем к значению в ячейке "_1200") если первые 4 символа не равны "Z_BW".
Заранее благодарен.  
Изменено: ageres1982 - 15.10.2019 08:19:33
Страницы: 1
Наверх