html选中列表整列变色,excel选中行变色完整代码和动画效果

内容提要：文章介绍excel选中行变色的效果以及实现选中行变色的VBA代码。

在excel中如果行数过多，经常核对数据的准确性，容易错行跳行，所以才有本文的小技巧：excel选中行变色。

当我们在excel工作表中，鼠标随便选择某一行的某一个单元格，那么选中行变色。

下面是excel选中行变色的动画效果展示：

excel选中行变色的操作步骤如下：

在工作表名称上单击右键，比如"Sheet1"工作表，选择“查看代码”，复制下面的代码，然后关闭VBE编辑器，回到excel工作表测试效果，任意单击一个单元格，相应的选中行将变色。

Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)

On Error Resume Next

Cells.FormatConditions.Delete

With Target.EntireRow.FormatConditions

.Delete

.Add xlExpression, , "TRUE"

.Item(1).Interior.ColorIndex = 7

End With

End Sub

上面这段代码严谨之处在于，如果单元格本身填充了颜色，以前的颜色不会消去。

下面这段代码依然可以实现选中行变色，但是如果单元格自身填充了颜色，当鼠标选择整行后，以前的填充色将会被自动消去。而且不支持多选，比如选择几行，变色的仍然只有一行。

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

Rows.Interior.ColorIndex = xlNone

Rows(Target.Row).Interior.ColorIndex = 7

End Sub

另外一种excel自动变色效果，是当符号某一条件，那么整行变色。这种效果可以使用条件格式完成。请参考文章：excel条件格式整行变色的详细方法www.ittribalwo.com/article/1518.html