VBA 超連結疑問 - Excel程式區 - 麻辣家族討論版版

麻辣家族討論版版 » Excel程式區 » VBA 超連結疑問

返回列表下一主題上一主題發帖

[發問] VBA 超連結疑問

中學生 Rank: 2

帖子: 163
主題: 1
精華: 0
積分: 170
點名: 0
作業系統: Window 7
軟體版本: Office 2007
閱讀權限: 20
性別: 男
註冊時間: 2010-9-5
最後登錄: 2022-7-20

1^# 跳轉到 »

發表於 2016-6-28 20:02 | 顯示全部帖子

回復 1# Michelle-W
試看看。

Sub test()
Dim cell As Range
For i = 2 To [A65536].End(3).Row
Set cell = Cells(i, 1)
ActiveSheet.Hyperlinks.Add Anchor:=cell, Address:=Cells(i, 2).Value, TextToDisplay:=cell.Value
Next i
End Sub

複製代碼

靜思自在 : 有心就有福，有願就有力，自造福田，自得福緣。

返回列表下一主題上一主題