buy0769

你想这样啊,试试这段代码看行不:右键工作表名称--查看代码,在空白处粘贴就可以

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

    Cells.Interior.ColorIndex = xlNone

      Target.Interior.ColorIndex = 8

 End Sub

复制代码

分类:

技术点:

相关文章: