Excel VBA:编辑新行的现有条件格式设置规则

时间:2017-04-04 16:03:16

标签: excel vba excel-vba conditional-formatting

我有一个电子表格,其中某些条件格式应用于某些范围的单元格(例如$B$4:$F$5)。我设置了一个宏来添加一个新行,复制当前最后一行中的格式+公式。问题是,每次添加新行时,都会创建一个仅影响新行的附加条件格式设置规则。

如何使用VBA扩展我已经设置的条件 - 使规则影响$B$4:$F$6

1 个答案:

答案 0 :(得分:1)

填写并删除常量,而不是复制和粘贴特殊值,值和格式。这应该明确地将CFR扩展到新的一行。

With Worksheets("sheet1")
    With .Range(.Cells(4, "B"), .Cells(.Rows.Count, "F").End(xlUp))
        .Offset(.Rows.Count - 1, 0).Resize(2, .Columns.Count).FillDown
        On Error Resume Next
        'Debug.Print .Offset(.Rows.Count, 0).Resize(1, .Columns.Count).Address(0, 0)
        .Offset(.Rows.Count, 0).Resize(1, .Columns.Count).SpecialCells(xlCellTypeConstants, 23).ClearContents
        On Error GoTo 0
    End With
End With