EXCEL中点击单元格，所在行和列都改变颜色

我是个菇凉2023-08-31 20:42

在日常工作中，尤其是办公室工作人群，尝尝需要处理大量的数据，在对数据进行修改时，时长发生看错行的事情，导致数据越改越乱，因此，我常用的一种方法就是选中单元格时，所在行、列标记为特殊颜色，下面就是我常用的标记方法，仅供参考，如大家还有其他方法，可以评论一下，大家互相学习。

测试环境：

系统：windows 7

工具：office 专业增强版 2016 - EXCEL

宏语言

1、打开VBA编辑环境：选择对应的sheet文件右键选择【查看代码】即可。

2、粘贴如下代码在编辑区域并保存后关闭。

javascript 复制代码

Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
On Error Resume Next
Cells.FormatConditions.Delete
// 如下代码是行变，在粘贴到VBA中时，需要删除。
With Target.EntireRow.FormatConditions 
.Delete
.Add xlExpression, , "TRUE"
//颜色选择，改变该值，行的颜色会改变,在粘贴到VBA中时，需要删除。
.Item(1).Interior.ColorIndex = 35 
// 如下代码是列变，在粘贴到VBA中时，需要删除。
End With
With Target.EntireColumn.FormatConditions '列变色
.Delete
.Add xlExpression, , "TRUE"
//颜色选择，改变该值，行的颜色会改变,在粘贴到VBA中时，需要删除。
.Item(1).Interior.ColorIndex = 35
End With
End Sub

备注：

1、当在保存宏文件时如果有如下提示：

解决上图问题按照如下步骤启用宏即可：

2、Interior.ColorIndex 对应的色值表：