点击某一行的某个单元格的值时,可以突出显示列?

这是我的情况:

我想突出显示不同的列,当我点击在同一行的某个单元格中的值的行中的任何单元格。

例:

我点击第2行 – > C2说“蓝色” – >列B,D,E,F自动以黄色突出显示

这可能吗? (最好不要每次点击不同的行时重新运行一个macros)

谢谢!

实际上很简单的VBA。 祝你好运。

 Option Explicit Private Sub Worksheet_SelectionChange(ByVal Target As Range) Dim lngRow As Long, intCol lngRow = Target.Row If Cells(lngRow, 3) = "Blue" Then intCol = 6 Else: intCol = 0 Columns(2).Interior.ColorIndex = intCol Columns(4).Interior.ColorIndex = intCol Columns(5).Interior.ColorIndex = intCol Columns(6).Interior.ColorIndex = intCol End Sub