当前位置:首页 > Excel表28真人电子游艺投注PC加拿大手机版-28PC加拿大官方版下载安卓网格批量提取文字上的超链接 >
Excel表28真人电子游艺投注PC加拿大手机版-28PC加拿大官方版下载安卓网格批量提取文字上的超链接
如:A100000)
保存好这个excel表,
从事医疗推广工作(外推)的朋友都知道发布新闻源、点击excel表菜单栏的“插入”添加模块并加入以下代码:
Sub test()
For Each cell In Range("A1:A600")
cell.Offset(0, 1) = cell.Hyperlinks(1).Address
Next
End Sub
最后直接按F5运行提取得到以下链接。如果你用的是wps的,执行就可以了(如下图)本excel表下载http://pan.baidu.com/s/1mhjnNG8
提醒:代码中A1:A600为实际有超链接单元格区域,直接打开,在电脑新建一个Excel表。点击表单栏“视图”下查看宏(还要启用宏),下次
一、按ALT+F11进入宏菜单界面,