如何在Excel中将URL文本转换为可单击的超链接？

假设您的工作表中有多个URL，但是它们没有链接，现在您需要将所有未链接的URL转换为可单击的超链接，如下面的屏幕快照所示。 当然，您可以一次双击它们以使其可单击，但是如果有很多URL，这将很耗时。 如何在Excel中自动将多个未链接的URL转换为可单击的超链接？

使用VBA代码将URL文本转换为可点击的超链接

使用 Kutools for Excel 将 url 文本转换为可点击的超链接

使用VBA代码将URL文本转换为可点击的超链接

除使用以下VBA代码外，似乎没有其他有效的方法可以解决Excel中的此问题。

1。 选择要转换为可单击超链接的URL文本范围。

2。 按住 ALT + F11 键打开 Microsoft Visual Basic应用程序 窗口。

3。 点击 插页 > 模块，然后将以下代码粘贴到“模块窗口”中。

Sub ConvertToHyperlinks()
'Updateby Extendoffice
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
For Each Rng In WorkRng
    Application.ActiveSheet.Hyperlinks.Add Rng, Rng.Value
Next
End Sub

4。 然后按 F5 键运行代码，弹出对话框供您选择范围，然后单击 OK，并且所选的未链接网址已转换为可点击的超链接。 查看屏幕截图：

使用 Kutools for Excel 将 url 文本转换为可点击的超链接

也许VBA代码对您来说有些困难，在这里，我可以向您介绍一个多功能工具-Kutools for Excel，其 转换超链接 功能，您可以快速处理以下操作：

• 从超链接中提取实际地址；
• 将网址文字转换为可点击的超链接

如果你已经安装 Kutools for Excel，请执行以下操作：

1。 选择要转换为可单击超链接的URL文本范围。

2。 点击 库工具 > 链接 > 转换超链接，请参见屏幕截图：

3。 在 转换超链接 对话框中选择 单元格内容替换超链接地址和点击 来自的按钮 结果范围 指定要放入结果的单元格。

4。 然后点击 OK，所有选定的纯文本链接都已转换为可单击的超链接。 看截图：

笔记：

1.如果您想将实际地址设为原始范围，请检查 转换来源范围.

2.如果超链接链接到当前文档，请检查 超链接是本文档中的一个地方 选项。

点击 转换超链接 进一步了解此功能。

立即下载和免费试用Excel的Kutools！

  演示：使用 Kutools for Excel 将 url 文本转换为可点击的超链接

相关文章：

如何从Excel中的超链接中提取实际地址？