Excel VBA – 对象'_Global'的方法'范围'失败。 错误

我是新的excel VBA和在这个项目中，我想如果单元格B4不是空的，单元格C4是空的，那么应该高亮显示C4。 同样的代码应该循环到B16单元格。 “AMA79”是工作表名称。 我得到对象'_Global'的方法'范围'失败。 错误使用此代码。 你可以让我知道该怎么做才能纠正这个问题。

Dim i As Integer Dim rng As Range Set rng = Range("B4:B16") For i = 4 To 16 With ThisWorkbook.Worksheets("AMA79") If Range(B, i).Value <> "" And Range(D, i).Value = "" Then Range(c, i).Interior.Color = vbYellow End If End With Next i 

Answer 1

试试这个： 编辑：

  Sub test() Dim i As Integer Dim wb As Workbook Dim ws As Worksheet Set wb = ThisWorkbook Set ws = wb.Sheets("AMA79") For i = 4 To 16 If ws.Range("B" & i).Value <> "" And ws.Range("D" & i).Value = "" Then ws.Range("C" & i).Interior.Color = vbYellow ws.Range("B29").Value = "Please validate the cells highlighted" End If Next i End Sub