工具，宏，visual basic 编辑器.

单击左侧的sheet名，
在出现的窗口中加入

'整行高亮

程序代码 程序代码

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Cells.EntireRow.Interior.ColorIndex = 0 '先將儲存格底色恢復原狀
Target.EntireRow.Interior.ColorIndex = 19
End Sub




'单元格高亮

程序代码 程序代码

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Cells.Interior.ColorIndex = 0 '先將儲存格底色恢復原狀
Target.Interior.ColorIndex = 19
End Sub

—–