如何读取Hyperlinks的Address?

ning84

Hyperlinks.Add 方法 (Excel) | Microsoft Learn






Hyperlinks.Add 方法 (Excel)

本文内容

• [color=var(--theme-hyperlink)]语法
• [color=var(--theme-hyperlink)]Parameters
• [color=var(--theme-hyperlink)]返回值
• [color=var(--theme-hyperlink)]注解
• [color=var(--theme-hyperlink)]示例
  

向指定的区域或形状添加超链接。

语法

expression.Add (Anchor, Address, SubAddress, ScreenTip, TextToDisplay)

expression：一个表示 [color=var(--theme-hyperlink)]Hyperlinks 对象的变量。

名称

必需/可选

数据类型

说明

Anchor必需Object超链接的定位标记。 可为 [color=var(--theme-hyperlink)]Range 或 [color=var(--theme-hyperlink)]Shape 对象。
Address必需String超链接的地址。
SubAddress可选Variant超链接的子地址。
ScreenTip可选Variant当鼠标指针停留在超链接上时所显示的屏幕提示。
TextToDisplay可选Variant要为超链接显示的文本。

ning84

用豆包解决问题。

1. Sub dd()
   
2.     Dim Rng As Range
   
3.         Set Rng = Selection
   
4.         For ii = 1 To Rng.Rows.Count
   
5.              Debug.Print Rng(ii, 1),
   
6.              Debug.Print Rng.Hyperlinks(1).Address
   
7.         Next ii
   
8. End Sub

复制代码