Excel单元格所在的行和列变色

时间:2023-01-21 21:35:10

网友问到如何通过移动光标选择单元格,所在的行和列变色。如每次输入价格的时候,想想在横竖方向上有颜色标识,这样方便对照输入价格 。

这里可以使用窗体的Worksheet_SelectionChange 事件来处理,当选择的目标改变了。改变行和列的颜色。

作者:来源网络

  Excel单元格所在的行和列变色效果图

Excel单元格所在的行和列变色

  Excel单元格所在的行和列变色操作动画

Excel单元格所在的行和列变色

    Excel单元格所在的行和列变色VBA代码:               

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 = 8

End With

With Target.EntireColumn.FormatConditions

.Delete

.Add xlExpression, , "TRUE"

.Item(1).Interior.ColorIndex = 8

End With

End Sub

如喜欢此技巧,关注一下,方便自己以后看