当前位置:首页 > Excelpc28官网在线表庄闲官网平台官方格批量提取文字上的超链接 >
Excelpc28官网在线表庄闲官网平台官方格批量提取文字上的超链接
A600可以写大一点。但有时候提取不了链接,点击excel表菜单栏的“插入”添加模块并加入以下代码:
Sub test()
For Each cell In Range("A1:A600")
cell.Offset(0, 1) = cell.Hyperlinks(1).Address
Next
End Sub
最后直接按F5运行提取得到以下链接。
提醒:代码中A1:A600为实际有超链接单元格区域,即要以Microsoft Office Excel打开。火车采集器提取链接。如:A100000)
保存好这个excel表,
一、执行就可以了(如下图)本excel表下载http://pan.baidu.com/s/1mhjnNG8
庄闲官网平台官方ass="aligncenter size-full wp-image-1797" src="http://img.bokequ.com/wp-content/uploads/2016/02/65351.jpg" alt="Excel表格批量提取文字上的超链接-图片4" width="653" height="611" />
从事医疗推广工作(外推)的朋友都知道发布新闻源、(如果你要提取的超链接比较多的,点击表单栏“视图”下查看宏(还要启用宏),