在超链接的单元格之间复制条件格式

如何确保单元格的条件格式也适用于其超链接单元格？

以下是我正在尝试做的一个基本的例子。 单元格E6有条件格式。 单元M7超链接到单元格E6。 我如何确保M7的格式与E6相同？

Answer 1

使用Hyperlink.SubAddess获取对其目标范围的引用。 然后复制目标范围并使用Hyperlink.PasteSpecial xlPasteFormats复制所有的格式化。 如果你只是想要条件格式，那么你将不得不遍历目标的FormatConditions。

 Sub ProcessHyperlinks() Dim h As Hyperlink Dim ws As Worksheet For Each ws In ActiveWorkbook.Worksheets For Each h In ws.Hyperlinks If h.SubAddress <> "" Then On Error Resume Next h.Range.FormatConditions.Delete Range(h.SubAddress).Copy h.Range.PasteSpecial xlPasteFormats On Error GoTo 0 End If Next Next End Sub 

Answer 2

tl; dr将适用范围扩展到 ,M7

在已经被有条件格式化的CF的“适用范围”中包含M7。 例如，假设E6的条件格式：G24的条件是F15的值为AAAA ，例如使用此公式规则：

  =$F$15="AAAA" 

适用于$E$6:$G$24 。

在“条件格式规则pipe理器”中，select“适用于”并追加M7 ：

然而，function可能取决于您的具体情况。