(相关资料图)

1、按Alt+F11，双击左边框里一个表格名称，将下面代码粘贴到右边框中。

2、Private Sub Worksheet_SelectionChange(ByVal Target As Range)Cells.Interior.ColorIndex = xlNoneActiveCell.EntireRow.Interior.ColorIndex = 35ActiveCell.EntireColumn.Interior.ColorIndex = 35End Sub。

本文到此分享完毕，希望对大家有所帮助。