首先看看最终效果 ：

VBA代码为：

Private Sub worksheet_selectionchange(ByVal target As Range)

If target.Count = 1 And target.Row > 1 Then

Rows('1:' & Rows.Count).Interior.Color = xlNone

target.EntireRow.Interior.Color = vbGreen

End If

End Sub

接下来是操作步骤……

1.点击开发工具→Visual Basic

2.双击你想要高亮行的工作表名称→在右侧的编辑窗口粘贴代码

3.关闭VBA编辑窗口，返回工作表，点击鼠标，是不是鼠标点击的单元格所在的行已经高亮显示了，大功告成

PS:高亮显示颜色可以更改，把“target.EntireRow.Interior.Color = vbGreen”代码行等于号后边的“vbGreen”改成其它颜色的RGB值就可以了，如：target.EntireRow.Interior.Color =RGB(251, 187, 13)，就是下图效果

什么？你说你的EXCEL没有开发者选项这个工具栏，那么点击“开始→选项”按照下图设置一下就好了！

喜欢的朋友记得收藏和关注我们。