时间戳

首页 > 解决方案 > 基于搜索命令的宏中的多个条件 -if else

excel - 基于搜索命令的宏中的多个条件 -if else

问题描述

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 条件？

标签： excelvba

解决方案

我建议你编辑你的问题。否则人们会减去它来降低你的评级（就像有人已经做过的那样）。目前尚不清楚您要做什么，但是遍历范围并将某些值输出到其 Offset 是这样的：

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

推荐阅读