遍历所有值

时间:2018-12-20 20:56:25

标签: excel vba

如果要找到某个值,我想遍历一列并修改相邻的列。

我有一半工作。它只会修改一个值,而不是所有实例。

mysqli_real_escape_string()

我希望是这样

Sub PopulateField()

    For i = 2 To Rows.Count

        If Cells(i, 2).Value = "25 December 2018" Then
            Cells(i, 3).Value = "Holiday"
            Exit For
        End If
    Next i

End Sub

但目前仅是

25 December 2018    Holiday
25 December 2018    Holiday
25 December 2018    Holiday
25 December 2018    Holiday
25 December 2018    Holiday

似乎并没有遍历所有值。

1 个答案:

答案 0 :(得分:3)

<head>的第一个实例之后,您将退出循环。

摆脱25 December 2018继续迭代。