时间:2016-04-03 14:42 来源: 我爱IT技术网 作者:佚名
确保宏可以启用。在此Excel中同时按Alt和F11，进入宏界面，点菜单的插入，模块，粘贴如下代码：
For Each cell In Range("A2:A48")
cell.Offset(0, 1)=cell.Hyperlinks(1).Address
Next
End Sub
把A2:A48改为你实际有超链接的单元格区域，直接按F5运行此宏，在对应的右边一格出现超链接地址。
详细的具体步骤或操作方法
在此Excel中同时按Alt和F11，进入宏界面
点菜单的插入，模块，粘贴如下代码：
For Each cell In Range("A1:A241")
cell.Offset(0, 1)=cell.Hyperlinks(1).Address
Next
End Sub
把A1:A241改为你实际有超链接的单元格区域
按F5运行此宏
对应的右边一格出现超链接地址。
经验内容仅供参考，如果您需解决具体问题(尤其法律、医学等领域)，建议您详细咨询相关领域专业人士。- 评论列表（网友评论仅供网友表达个人看法，并不表明本站同意其观点或证实其描述）
-