如何设置选中的单元格背景色, 同时也不清除原设定的颜色

hgc1124

如图如附件:
在单元格无特殊背景色的情况下, 很难区分相邻单元格的内容(不想把字体设的再小或变大单元格)
用了 VBA, 有背景色, 但会清除所有单元格的设定颜色.
请教各位大神, 有没方法可以设置选中的单元格背景色(只在选中时显示), 同时也不清除原设定的颜色?

VBA:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

    Cells.Interior.Pattern = xlNone

    Selection.Interior.ColorIndex = 39

End Sub

wming1025

Private Sub Worksheet_SelectionChange(ByVal T As Range)
    Cells.Interior.ColorIndex = 0
    T.Cells.Interior.ColorIndex = 6
End Sub

hgc1124

wming1025 发表于 2018-10-27 14:49
Private Sub Worksheet_SelectionChange(ByVal T As Range)
    Cells.Interior.ColorIndex = 0
    T.Ce ...

谢谢您的相助.
这个 code 依然会清除第一列 Status 的颜色.

mmlzh

http://club.excelhome.net/thread-1120484-1-1.htmlhttp://club.excelhome.net/thread-1060394-1-1.html

hgc1124

mmlzh 发表于 2018-10-29 08:34
http://club.excelhome.net/thread-1120484-1-1.htmlhttp://club.excelhome.net/thread-1060394-1-1.html

用了所转帖子里转的祝大的命令, 会高亮所选单元格的整列整行, 看起来效果还是不行. 有没只高亮单元格的方法?

[VBA] 高亮显示活动单元格所在行与列
http://club.excelhome.net/thread-1060394-1-1.html

lift0502

hgc1124 发表于 2018-10-29 22:37
用了所转帖子里转的祝大的命令, 会高亮所选单元格的整列整行, 看起来效果还是不行. 有没只高亮单元格的方 ...

这个问题解决了么？兄弟？求这样的代码！！