VFP如何提取EXCEL里的超链接地址 - VFP论坛

编程论坛 → 数据库技术 → 『 VFP论坛』 → VFP如何提取EXCEL里的超链接地址

标题：VFP如何提取EXCEL里的超链接地址

只看楼主

hysoft88

等　级：新手上路
帖　子：5
专家分：0
注　册：2007-9-16

楼主

问题点数：0 回复次数：4

VFP如何提取EXCEL里的超链接地址

VFP如何读取EXCEL里的超链接地址

搜索更多相关主题的帖子: VFP　超链接　地址　提取　 EXCEL　

2022-06-27 21:50

吹水佬

等　级：版主
威　望：432
帖　子：10064
专家分：41463
注　册：2014-5-20

第 2 楼

得分:0

FOR EACH url IN oExcel.ActiveSheet.Hyperlinks
? url.Address
ENDFOR

2022-06-28 07:56

sych

等　级：论坛游侠
威　望：6
帖　子：179
专家分：183
注　册：2019-10-11

第 3 楼

得分:0

给你做了一个函数，把它拷贝到模块中去,取地址的时候就直接 =GetNameHyperlinks(A1) 就OK了
Function GetNameHyperlinks(rng As Range)
    With rng.Hyperlinks(1)
        GetNameHyperlinks = IIf(.Address = "", .SubAddress, .Address)
    End With
End Function

2022-06-28 08:43

wengjl