突出显示所选行而不使用VBA在Excel中更改颜色

时间:2017-07-14 17:56:18

标签: excel vba excel-vba

我想在Excel工作表上突出显示当前所选行的图案(不是颜色,因为该行上的某些单元格可能已经着色)。 我编写了以下VBA宏,但是当选择新单元格时,它会重置整个工作表的颜色。如果它清除了工作表上的整个模式(因为没有使用模式格式化单元格),但是,即使我指定仅清除模式(使用ActiveSheet.Cells.Interior.Pattern = xlPatternNone),它也会清除颜色和边框

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    'remove past colors
    ActiveSheet.Cells.Interior.Pattern = xlPatternNone
    With Me
        .Rows(Target.Row).Interior.Pattern = XlPattern.xlPatternChecker
    End With
End Sub

1 个答案:

答案 0 :(得分:1)

使用xlPatternAutomatic代替xlPatternNone。请注意,它也将删除网格(但不会删除您添加的边框)。