第一步 按住Alt鍵不放,再按F11調(diào)出VBA

第二步 在VBA中雙擊左側(cè)的sheet1

第三步 在右邊復(fù)制以下代碼

第四步 關(guān)閉VBA

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

With Target

.Parent.Cells.Interior.ColorIndex = xlNone

.EntireRow.Interior.ColorIndex = 6

.EntireColumn.Interior.ColorIndex = 6

End With

End Sub

備注：

代碼中的兩個 =6 是背景顏色為黃色

=7是粉紅色 可以修改數(shù)字 改變背景顏色

.Parent.Cells.Interior.ColorIndex = xlNone

清除工作表單元格的背景色

.EntireRow.Interior.ColorIndex = 6

設(shè)置選中區(qū)域所在行的背景色

.EntireColumn.Interior.ColorIndex = 6

設(shè)置選中區(qū)域所在列的背景色