【求助】如何利用VBA取得EXCEL中超連結的資料

[Timothy]

請問要如何利用VBA取得EXCEL中超連結的資料, 原來的連結資料
是使用本機路徑來連結, 結果透過網芳之後, 全部都連不到了, 所以
想要利用VBA設計一個程序, 來做搜尋替換的作業, 在此請大家幫
幫小弟, 謝謝!

[leonchou]

試試

For Each link In ActiveSheet.Hyperlinks
   link.Address = Replace(link.Address, "要找的", "取代為")
Next

以上的程式會把目前工作表中所有超連結位址指定的字串取代為特定字串.

[Timothy]

首先感謝您的回答, 我試了一下, 出現了 "無效的外部程序"
, 我查了一下 ActiveSheet 這個關鍵字, 在輔助說明中找不
到!

PS: 使用版本為 MS Office 2000

[leonchou]

我的也是 2000 版, 測試沒問題.
ActiveSheet 意思是作用中的工作表, 是Excel VBA常用的物件.
可把你的程式貼上來看看?