本文转载自公众号:学习向,作者:向健。 首先看看最终效果: 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没有开发者选项这个工具栏,那么点击"开始→选项"按照下图设置一下就好了!