方法：

1,excel中，按Alt+F11，打开VBA编辑界面，双击需要改的工作表名称，将下面代码粘贴到右边框中，即可。

2，代码：

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Cells.Interior.ColorIndex = 0
Rows(Target.Row).Interior.ColorIndex = 34
End Sub

 

3，如果想变颜色，改这句代码的值：

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Cells.Interior.ColorIndex = 0
Rows(Target.Row).Interior.ColorIndex = 34
End Sub

 

4，ColorIndex值列表：