数据结构
网络
关系数据库管理系统
操作系统
Java
MS Excel
iOS
HTML
CSS
Android
Python
C 编程
C++
C#
MongoDB
MySQL
Javascript
PHP
物理学
化学
生物学
数学
英语
经济学
心理学
社会学
时尚研究
法律研究如何在 Excel 中将 URL 文本转换为可点击的超链接？
您是否尝试过在 Excel 中将文本转换为超链接？如果您遇到任何困难，本文将帮助您完成此任务。HYPERLINK 函数创建一个快捷方式，跳转到当前工作簿中的另一个位置，或打开存储在网络服务器、内联网或 Internet 上的文档。
当您单击包含 HYPERLINK 函数的单元格时，Excel 会跳转到列出的位置或打开您指定的文档。如果您尝试使用右键菜单中的直接菜单将 Excel 中的文本转换为超链接，则这可能是一个乏味且过时的过程。而且，如果文本分散在工作表的不同位置，即不是列表形式，则完成我们的任务可能是一个耗时的过程。我们可以使用 VBA 应用程序以更快的速度解决此问题。阅读本教程以了解在 Excel 中将 URL 文本转换为可点击超链接的过程。
在 Excel 中将 URL 文本转换为可点击超链接
在这里，我们将首先打开 VBA 应用程序并使用 VBA 代码将 URL 转换为超链接。让我们看一下使用 VBA 应用程序在 Excel 中将 URL 文本转换为可点击超链接的简单过程。
步骤 1
让我们考虑一个 Excel 工作表，其中我们有一系列类似于下图的 URL 文本。
现在右键单击工作表名称并选择“查看代码”以打开 VBA 应用程序。
右键单击 -> 查看代码
步骤 2
单击“插入”并选择“模块”，然后在文本框中键入以下程序代码：
程序
Sub ConvertToHyperlinks()
'Updated By Nirmla
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "Converrt Hyper Link"
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
步骤 3
然后将工作表另存为启用宏的工作簿，单击 F5 运行代码，选择要转换为超链接的文本范围，然后单击“确定”，如下面的图像所示。
保存 > F5 > 选择范围 > 确定
结论
在本教程中，我们使用了一个简单的示例来演示如何在 Excel 中将文本转换为超链接。
更新于： 2023 年 3 月 7 日
1K+ 次查看
广告