buy0769

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

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

    Cells.Interior.ColorIndex = xlNone

      Target.Interior.ColorIndex = 8

 End Sub

复制代码

分类:

技术点:

相关文章:

  • 2021-05-14
  • 2021-11-28
  • 2021-05-14
  • 2021-12-13
  • 2021-11-27
  • 2021-11-27
  • 2021-05-07
  • 2021-11-28
猜你喜欢
  • 2022-01-24
  • 2021-11-27
  • 2021-11-17
  • 2022-01-28
  • 2021-12-26
  • 2021-06-02
  • 2021-03-30
相关资源
相似解决方案