用VBA的,手機打字具體細節可能有誤，需要自己除錯。

target.rows.interior.colorindex=vbgreen

target.columns.interior.colorindex=vbgreen

第二步，設定宏安全性等級流程：開發工具→宏安全性→宏設定→啟用所有的宏(選中)；

第三步，將以下程式碼考錄到Sheet1(程式碼)視窗中，設定VBA程式碼流程：開發工具→Visual Baaic→Sheet1(Sheet1)(雙擊)；

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

If Target.Row >= 5 And Target.Row <= 70 Then "指定行

If Target.Column = 9 Or Target.Column = 10 Or Target.Column = 11 Or Target.Column = 16 Or Target.Column = 17 Then "指定列

Target.Parent.Range("G3:w70").Interior.ColorIndex = xlNone "清除工作表單元格的原來的背景色

Range(Target.Offset(0, 7 - Target.Column), Target.Offset(0, -1)).Interior.Color = vbGreen "設定所在行變為綠色，vbGreen可改變

Range(Target.Offset(3 - Target.Row, 0), Target.Offset(-1, 0)).Interior.Color = vbGreen "設定所在行列為綠色，vbGreen可改變

End If

End If

End Sub

第四步，儲存(2003版不需要選儲存型別)流程：檔案→儲存→儲存型別→Excel 啟用宏的工作簿(*.xlsm)(選中)→儲存；