是否在Excel单元格中创建超链接？

是否可以在Excel单元格中创建超链接，该单元格仅使用单元格文本的一部分作为可单击链接？也就是说，下表中的模型是否表示可以在Excel 2010中轻松构建的内容

我知道可以很容易地将整个单元格制作成超链接，但据我所知，并不是单元格的特定部分

通过超链接，我也指

• （a） 另一个细胞或
• （b） 一个网址

---

谢谢

这在Excel中是不可能的。超链接与整个单元格相关联

---

如果您查看，您可以看到它与一个范围相关联。如果可以将超链接与单元格内的跨距关联，则超链接对象需要具有关联的范围和对象。

创建超链接后，您可以格式化单元格中的文本，以便只有感兴趣的单词加下划线/蓝色。超链接仍然有效，但显然每个单元格只能有一个链接，单击文本中的任何位置都会触发超链接

例如：

Sub Tester()

    Dim rng As Range

    Set rng = ActiveSheet.Range("A1")

    rng.Parent.Hyperlinks.Add Anchor:=rng, Address:="", SubAddress:= _
        "Sheet1!A10", TextToDisplay:="this is long text"

    With rng.Font
        .ColorIndex = xlAutomatic
        .Underline = xlUnderlineStyleNone
    End With

    With rng.Characters(Start:=9, Length:=4).Font
        .Underline = xlUnderlineStyleSingle
        .Color = -4165632
    End With

End Sub

---

我需要链接到单元格中显示的文件名，以下是对我有效的方法：

ActiveSheet.Hyperlinks.Add Anchor:=Cells(row, column), Address:=file.Path, TextToDisplay:=file.Path

---

上面的一行非常有用。。。因为我是新来的，所以我不能发表评论。这是我上面的一个变体，它获取工作表上的每一行，并根据该行上的值构建一个URL

CHGRow = 3
Worksheets("Page 1").Select
Cells(CHGRow, 1).Select

Do Until Application.CountA(ActiveCell.EntireRow) = 0

    URLVal = "https://our_url_here?some_parameter=" & Cells(CHGRow, cNumber)
    URLText = Cells(CHGRow, cNumber)
    ActiveSheet.Hyperlinks.Add Anchor:=Cells(CHGRow, cURL), Address:=URLVal, TextToDisplay:=URLText

    CHGRow = CHGRow + 1
    Cells(CHGRow, 1).Select

Loop

---

我会把你的一行变成两行，把你需要的列中的单元格合并成一行，当你到达需要超链接的单元格时，把单词放在上面的单元格，把链接放在下面的单元格。作为一种非技术性的解决方案，它看起来不错。

欣赏针对每个单元格的单链接的视觉解决方案，尽管这相当困难。：-）谢谢你的回复。必须输入一个功能请求！很抱歉报告-但是到dropbox的链接返回404