excel - 打印电子表格的所有条件格式规则

Question

我希望 VBA 代码打印电子表格中的每个条件格式化规则，包括规则类型、规则描述(公式)、规则适用的颜色和单元格范围。 我如何实现这一目标？

Answer 1

你可以像这样列出它，非常容易。

Sub ListAllCF()
    Dim cf As FormatCondition
    Dim ws As Worksheet
    Set ws = ActiveSheet
    For Each cf In ws.Cells.FormatConditions
        Debug.Print cf.AppliesTo.Address, cf.Type, cf.Formula1, cf.Interior.Color, cf.Font.Name
    Next cf
End Sub

但是它有问题，因为某些类型无法使用这种方式列出，因此您需要捕获错误并找到其他方法来列出错误类型。