如果Excel VBA中的范围(“M7:Q500”或(“C7:C500”)发生任何更改,请突出显示整行

如果Excel VBA中的范围(“M7:Q500”或(“C7:C500”)发生任何更改,请突出显示整行,vba,excel,highlighting,Vba,Excel,Highlighting,我已经设置了一个代码,但我知道它是完全错误的。我的目标是在(“M7:Q500”)或(“C7:C500”)中进行更改时高亮显示整行,并根据更改的位置高亮显示行。前单元格M7(已更改)高亮显示整个7行 If Not Intersect(Target, Range("M7:Q500") Or ("C7:C500")) Is Nothing Then Cell.Interior.ColorIndex = 3 End If 或部分错误。试试这个: If Not Intersect(Target,

我已经设置了一个代码,但我知道它是完全错误的。我的目标是在(“M7:Q500”)或(“C7:C500”)中进行更改时高亮显示整行,并根据更改的位置高亮显示行。前单元格M7(已更改)高亮显示整个7行

If Not Intersect(Target, Range("M7:Q500") Or ("C7:C500")) Is Nothing Then
    Cell.Interior.ColorIndex = 3
End If

部分错误。试试这个:

If Not Intersect(Target, Range("M7:Q500")) Is Nothing Or _
  Not Intersect(Target, Range("C7:C500")) Is Nothing Then
    Rows(Target.Row).Interior.ColorIndex = 3
End If

我在此单元格上收到调试错误。Interior.ColorIndex=3@Chrismas007因为第一个错误而挂断了电话。我完全错过了第二个。谢谢。@ScottCraner,这样可以消除调试错误,但这只会突出显示更改的单个单元格。如何根据该更改突出显示整行?您是否看到我的编辑,它应该会显示整行@Luis Christmas007的评论只会让我的评论完成整行。@Luis请单击答案旁边的灰色/绿色复选标记,将其标记为正确。这是只有你才能做的事。