将 Excel 超链接中显示的文本更改为整行的不同单元格

将 Excel 超链接中显示的文本更改为整行的不同单元格

我有一列包含大量超链接。我希望显示的文本与另一个单元格中的文本相同。例如,我的超链接在 D 列中,而我希望显示的文本是 C 列中的相应单元格。是否有我可以制作并运行的宏或其他东西来将显示的文本更改为 C 列中的匹配单元格?手动操作的方法太多了。

答案1

尝试这个简短的 VBA 宏:

Sub TheMissingLink()
    Dim h As Hyperlink, r As Range

    For Each h In ActiveSheet.Hyperlinks
        If Not Intersect(h.Range, Range("D:D")) Is Nothing Then
            h.TextToDisplay = h.Range.Offset(0, -1).Value
        End If
    Next h

End Sub

这假设超链接是已插入而不是公式种类。

相关内容