b.将我们写好的代码复制到需要显示颜色的工作表中，本例中是sheet1中需要实现单元格显示高亮的结果。所有我们将代码写入到sheet1中。需要注意的一点是，当我们将代码写入到某个工作表的代码所在文件，此代码只对此工作表有效.我们返回工作表sheet1即可看到如下的效果，当然颜色是随机变化的.
2、如何通过VBA高亮显示EXCEL活动单元格所在整行和整列的颜色
我们是通过Excel VBA的SelectionChange事件功能，每当我们激活单元格时候，就自动触发事件，就执行我们设定好的功能，结果显示我们希望高亮显示单元格.我们先看看动画显示执行的结果，如下所示：
整行和整列高亮显示的代码如下：
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'定义变量
Dim rng As Range
'设置活动单元格所有的颜色为无色
Cells.Interior.ColorIndex = xlColorIndexNone
'对活动单元格所在行列进行赋值给到变量
Set rng = Application.Union(Target.EntireColumn, Target.EntireRow)
'设定活动单元格的颜色，其颜色随机变化,因RND函数易失性
rng.Interior.ColorIndex = Int(56 * Rnd() + 1)
Set rng = Nothing
End Sub
a.我们打开工作表后，打开VBA窗口，按ALT+F11即可打开。
b.将我们写好的代码复制到需要显示颜色的工作表中，本例中是sheet1中需要实现单元格所在整行整列显示高亮的结果。所有我们将代码写入到sheet2中。需要注意的一点是，当我们将代码写入到某个工作表的代码所在文件，此代码只对此工作表有效.我们返回工作表sheet1即可看到如下的效果，当然颜色是随机变化的.
点击单击格式区域的单元格，就会出现其所有行和列高亮显示的效果。这个功能其实在我们日常生活中还是非常有用的哦
PS：另外大家注意了，大家要将EXCEL的安全级别调低一点，不然不能运行宏命令的话哦。
以上就是今天要与大家分享的技巧，希望对大家有所帮助。
Excel中每一个方法都有特定的用途，不是它们没有用，而是你不了解或用不着，建议同学们收藏起来，万一要用着了