Есть таблица на листе source данные в ячейке состоят из 3х букв и 3х цифр(по умолчанию они соединены в буквенно цифровой код), Буквенно цифровые коды условно можно объединить в группы , где первые 3 буквы остаются постоянными а меняются последние 3 цифры в порядке увеличения. Нужно на новом листе result получить новую таблицу где для группы буквенно цифровых кодов будет сформировано следующее по порядку значение. Наверное не очень понятно написал, простите пожалуйста, но то что должно получиться хорошо видно на приложенном примере.
Добрый день. Уважаемые Гуру, научите пжста как получать на листе "Поиск" значение получаемое в столбце "Результат" не формулой, а макросом. (число строк в исходных таблицах не фиксировано, определяем автоматически) Как понимаю вариантов реализации множество. Хотелось бы увидеть макросы с использованием формулы, массивов,словаря ....(кто как умеет)
Помогите пожалуйста заполнить в PQ новый пользовательский столбец E2 по условию: если есть данные в B2 то E2 = B2, если B2 - пусто то E2=C2, если и B2 и С2 пусто то E2=D2,
Помогите пжста переделать макрос. Сейчас действие выполняется только для столбца "А" - 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
Здравствуйте. Уважаемые Гуру, помогите пжста с макросом. Бежим в цикле по столбцу пока ячейка не пустая и выполняем действие (дописываем к значению в ячейке "_1200") если первые 4 символа не равны "Z_BW". Заранее благодарен.