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

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

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

 

  作者：来源网络

 

  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

 

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