admin管理员组

文章数量:1530303

有时在网页需要复制一些超链接的地址，但是粘贴到excel或者word还是超链接表层的文本，需要对文本指向的超链接进行提取，因此用到了excel里面的模块功能
打开excel文档，按“Alt+F11”进入VBA环境，右击"Microsoft Excel 对象"，从其扩展菜单中选择“插入”-“模块”项。
在打开的模块1编辑页面中输入如下代码

Function GetActAddress(HlinkCell)
    Application.Volatile True
        With HlinkCell.Hyperlinks(1)
            GetActAddress = IIf(.Address = "", .SubAddress, .Address)
     End With
 End Function

关闭后返回Excel界面，在超链接右侧的单元格输入“=GetActAddress”即可看到自定义的函数

参考链接
https://jingyan.baidu/article/5553fa82c9f5a365a2393411.html

本文标签： 函数超链接方法Excel

版权声明：本文标题：excel提取超链接函数方法a 内容由热心网友自发贡献，该文观点仅代表作者本人， 转载请联系作者并注明出处：https://m.elefans.com/xitong/1726453399a1071551.html， 本站仅提供信息存储空间服务，不拥有所有权，不承担相关法律责任。如发现本站有涉嫌抄袭侵权/违法违规的内容，一经查实，本站将立刻删除。