vba在excel if条件或嵌套if

Question

嘿我想在 输入G行数据 时检查数据行 0 如果F行中的数据的值为0而不是一个msgbox弹出窗口，并提醒我弹出消息msg？

Answer 1

可能需要遍历所有内容。

Dim lastRow As String
Dim x as Long

lastRow = Sheets("Sheet1").Cells(Rows.Count, "F").End(xlUp).Row

For x = 1 To lastRow
    If Sheets("Sheet1").Range("F" & x) = 0 Then msgBox ("Zero Value" & x)
    Else (Add your else here, or drop the else and get get pinged every time you hit zero)
Next

这将遍历工作表中的每一行