如何確保單元格的條件格式也適用於其超鏈接單元格?在超鏈接單元格之間複製條件格式
下面是什麼,我試圖做一個簡單的例子。單元格E6具有條件格式。單元格M7超鏈接到單元格E6。我如何確保M7與E6具有相同的格式?
如何確保單元格的條件格式也適用於其超鏈接單元格?在超鏈接單元格之間複製條件格式
下面是什麼,我試圖做一個簡單的例子。單元格E6具有條件格式。單元格M7超鏈接到單元格E6。我如何確保M7與E6具有相同的格式?
使用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