亲 你是想把它去掉是吗 你看看我这个也有这个
你在视图下有一个阅读模式 然后点击
就没有了 在一点击就有了 这个就是为了方便你好看 不看串了 望采纳
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Cells.Interior.Color = xlNone
Columns(Target.Column).Interior.Color = 65535
Rows(Target.Row).Interior.Color = 65535
End Sub
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Cells.Interior.ColorIndex = xlNone
Rows(Target.Row).Interior.ColorIndex = vbYellow
Columns(Target.Column).Interior.ColorIndex = vbYellow
end sub
'---------------------将代码复制到你希望实现此功能的表格对象中