EXCEL2007版 光标所在行与列变色

1、Alt+F11进入VB编辑器，双击左侧 Thisworkbook，进入编辑

2、粘贴以下代码：Private Sub Workbook_SheetSelectionChange(ByVal Sh As Obj髫潋啜缅ect, ByVal Target As Range) If Application.CutCopyMode = xlCopy And n = 1 Then n = 0: End Cells.Interior.ColorIndex = 0 Target.EntireRow.Interior.ColorIndex = 34 Target.EntireColumn.Interior.ColorIndex = 34End Sub

3、点击保存按钮或Ctrl+s,如遇到警告请选择确定

4、代码内的两个34代表的是颜色，可以自行调整，建议选择8,比较合适。