else语句中的下标超出范围错误

Question

当我尝试运行我的代码时，我得到一个＆＃34;下标超出范围＆＃34;当它碰到这段代码中的else语句时出错：

  If Cells(i + 4 - n, 9).Value > 0 Then
        Cells(i + 4 - n, 9).Interior.ColorIndex = RGB(93, 255, 132)
        Else
        Cells(i + 4 - n, 9).Interior.ColorIndex = RGB(255, 83, 83)
  End If

有谁能告诉我如何解决这个问题？

Answer 1

尝试 -

If Cells(i + 4 - n, 9).Value > 0 Then
        Cells(i + 4 - n, 9).Interior.Color = RGB(93, 255, 132)
        Else
        Cells(i + 4 - n, 9).Interior.Color = RGB(255, 83, 83)
  End If