在Excel中循环遍历行并进行一些逻辑比较

时间:2014-02-28 12:49:10

标签: excel vba

我有一个包含许多列和行的电子表格。数据有一个标题行。我需要单独处理每一行,查看一个特定的列,拉出该值(一个助记符),查看它和基于该值的“Do Something”(逻辑比较和东西)。

我只需要设置循环的最佳方法,因此它从第一个非标题行开始,查看我的值并进行一些比较。我能做的比较逻辑。这是我在VBA中不熟悉的行走。

任何肮脏,快速的解决方案?

1 个答案:

答案 0 :(得分:1)

以下示例从 2 行开始向下扫描 B 列,寻找“幸福”:

Sub Happiness()
    Dim N As Long, I As Long
    N = Cells(Rows.Count, "B").End(xlUp).Row
    For I = 2 To N
        If Cells(I, "B").Value = "Happiness" Then
            MsgBox "Found happiness"
            Exit Sub
        End If
    Next I
    MsgBox "Failed"
End Sub