新浪博客
图２ 特定的单元格颜色突现
首先，我们来操作需求1。如何让Excel活动单元格所在行和列都着上背景颜色，首先看下图３。
图３
上图中，即Q3单元格，被鼠标选中，说明是活动的单元格，如何做才能做到如上图的效果，Q3活动单元格所在的行和列，其背景颜色都着上颜色，这样可以方便我们观察单元格，正确的录入数据，在核对时也更醒目。
这得使用VBA代码来完成，方法如下：
１）首先在Excel窗口中，按下键盘上的组合键：Alt + F11 这个时候，会弹出VBA窗口。
２）右键点击左边列表中的 Sheet2（你想在那个sheet上设置效果就选那个） 并选中查看代码（或者双击效果也是一样）。这样就会弹出一小个VBA输入窗口。如下图 ４
图４ 设置
３）在小窗口中的上面，左边选择Worksheet名称，右边选择SelectionChange事件。下面就可以在其内部输入代码了，如图５
图５ 设置窗口
代码如下，你可复制到你的窗口即可。
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Columns().Interior.ColorIndex = 0
End Sub
４）最后，保存VBA窗口并关闭（可按ctrl+S），回到Excel窗口，效果就出来了。
知识扩展：
Columns().Interior.ColorIndex = 0
x = ActiveCell.Column
Columns(x).Interior.ColorIndex = 3
如上代码的功能，是让活动单元格所在列着上背景颜色的代码。
y = ActiveCell.Row
Rows(y).Interior.ColorIndex = 3
如上代码的功能，是让活动单元格所在行着上背景颜色的代码。
图６
操作方法：
1）打开excel，按ALT + F11键，
2）选择你要对哪一个工作表进行设置，如sheet1，双击打开编程界面，如图７
图７
3）输入如下代码：
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Cells.Interior.ColorIndex = xlNone
Target.Interior.ColorIndex = 8
End Sub
注意： Target.Interior.ColorIndex = 8 中的数字8表示你的设定的颜色值，可自行调整喜欢的颜色。
4）按CTRL＋Ｓ 键保存即可。返回就可以看到你要的结果，如果上图。