如一个excel表100个数字第一行为1～10，第二行11～20...现在想实现：点击数字5，那个5表格就能自动用颜色显示出来；再点击一次就颜色就恢复原来。
颜色是指填充颜色。应该用宏很容易表达，求宏高手指导
复制代码
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Cells.Interior.ColorIndex = xlNone
Target.Interior.ColorIndex = 41
End Sub
根据你的喜好
把41修改为其他数字，就是不同的颜色
这个是符合要求，只是还有个问题，就是我要求点击后一直显示这个颜色， 除非双击取消
追答Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim cell As Range
Set cell = Target(1)
If Intersect(cell, [a1:d100]) Is Nothing Then Exit Sub
If cell.Interior.Color = vbRed Then
范围是A1：D100
自己修改
温馨提示：答案为网友推荐，仅供参考
