Bootstrap

Excel超链接文本:如何批量插入和提取超链接?

Excel超链接文本:如何批量插入和提取超链接?

一、提取超链接

1、请将含有超链接地址的文字内容复制到excel表格A列,B列保留,将导入超链接地址;

这里写图片描述

2、为防止越界,首先看清楚有多少行记录,比如本例80行;
3.在设置中显示开发工具,选择工具栏中的开发工具——宏,输入宏的名称(例如:提取超链接),然后点击创建,代码如下:
Sub 提取超链接()
For Each cell In Range("A2:A81")
cell.Offset(0, 1)=cell.Hyperlinks(1).Address
Next
End Sub

结果如下图所示
这里写图片描述

二、插入超链接

使用excel中的HYPERLINK函数
HYPERLINK函数
  1. 含义:创建一个快捷方式(跳转),用来打开存储在网络服务器、Intranet或internet中的文件。
  2. 格式: HYPERLINK(link_location,friendly_name).
       其中:HYPERLINK 为函数名
       link_location 为链接位置
       friendly_name 为显示文本
  3. 使用方法
    这里写图片描述
;