修改条件格式'AppliesTo'范围

时间:2018-02-14 18:52:25

标签: excel vba conditional-formatting

我有一张表(我们称之为Sheet1),它有两个现有的条件格式规则。适用于H列中的范围。Sheet1中的数据将被删除,新数据将通过数据库连接输入。删除和检索数据意味着条件格式应用于更改的RANGE。有没有办法可以更新CF格式RANGE(在Applies to框中)而不删除它并在代码中重新创建它?

伪代码就像

With Sheets("Sheet1")
.Cells.FormatConditions(1).AppliesTo = "H4:H" & .Range("H" & Rows.Count).End(xlUp).Row
.Cells.FormatConditions(2).AppliesTo = "H4:H" & .Range("H" & Rows.Count).End(xlUp).Row
End With

任何帮助将不胜感激, 非常感谢 Caleeco

1 个答案:

答案 0 :(得分:0)

谢谢@dwirony。以下代码适用,如果未来读者可能希望采用相同的方法。随意发布您自己的答案,我会将您的答案标记为解决方案。

Sub FillDown()
'// Fill down formatting to apply CF to entire range
    With Sheets("Sheet1")
        .Range("H4").Copy
        .Range("H4:H" & .Range("H" & Rows.Count).End(xlUp).Row).PasteSpecial Paste:=xlPasteFormats
    End With
End Sub