Excel vba - 对象“_Global”的方法“范围”失败。错误

Question

我是 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