множественное условие -if else в макросах на основе команд поиска

Question

Sub test2()
r = ActiveSheet.Range("K" & Rows.Count).End(xlUp).Row
Range("$M2:$M" & r & " ").Formula = "=IF(ISNUMBER(SEARCH(""14 5415 Ruggge"",K2)),""PAD-LAPTOP"",""Yes"")"

End Sub
   

Я использовал эту команду, чтобы использовать несколько условий. как я могу использовать в этой команде условие else?

Answer 1

Предлагаю отредактировать свой вопрос. Иначе люди будут его отрицать, занижая ваш рейтинг (как это уже сделали). Не совсем понятно, что вы пытаетесь сделать, но выполнить итерацию по диапазону и вывести определенное значение в его смещение примерно так:

Option Explicit

Sub test2()

Dim cell
Dim lRow As Long

lRow = ActiveSheet.Cells(Rows.Count, 11).End(xlUp).Row

For Each cell In ActiveSheet.Range("K1:K" & lRow)
    If cell.Value = "apple" Then
        cell.Offset(0, 2).Value = "PAD-LAPTOP"
    Else
        cell.Offset(0, 2).Value = "Yes"
    End If
Next cell

End Sub