要不换个思路,我不知道为啥单元格颜色改变不能触发事件,你在A11,B11输入对应的数字
,然后A2,B2单元格颜色变成红色。我感觉是一样的


Private Sub Worksheet_Change(ByVal Target As Range)
Dim rr, col
col = Target.Column
rr = Target.row
If Target.Cells.Count = 1 And rr > 9 Then
If Target = col Then
Cells(rr - 9, col).Interior.Color = 255
End If
End If
End Sub