打開某工作表（假設為“Sheet1”），單擊“工具”菜單中的“宏”，選擇“Visual Basic編輯器”命令，雙擊左側窗口中對應的工作表標簽名稱，在彈出的代碼窗口中輸入如下VBA代碼：

　　Private Sub WorksheetSelectionChange(ByVal Target As Range)

　　If Target.EntireRow.Interior.ColorIndex10 Then

　　Target.EntireRow.Interior.ColorIndex = 10Else

　　Target.EntireRow.Interior.ColorIndex = 0End IfEnd Sub

　 　關閉代碼窗口回到Excel工作表中，若需要查看某行記錄，只需單擊該行中的任一單元格，此時該行將會自動填充綠色并高亮顯示（若需改為其它顏色只需改 變代碼中相應的數(shù)值即可），再次單擊該行中任一單元格將取消背景色的填充。另外可同時使多行記錄填充背景，以方便查看或對比表格中的數(shù)據(jù)。

　　編輯提示：雖然單擊記錄前的行號可選定整行記錄，相對之下，本文提供的方法在日常辦公中更為方便和快捷。