返回列表 上一主題 發帖

[轉貼] VBA-將有超連結之標題的網址顯示出來

偉婕
　暱稱: 偉婕

版主Rank: 7Rank: 7Rank: 7

帖子
376 
主題
84 
精華
0 
積分
419 
點名
0  
作業系統
Win 8 
軟體版本
Office 2007 
閱讀權限
100 
性別
女 
註冊時間
2010-4-30 
最後登錄
2022-6-2 

論壇貢獻勳章美女勳章熱烈參與勳章
1# 跳轉到 » 倒序看帖
打印
tT
發表於 2010-6-30 23:38 | 只看該作者

[轉貼] VBA-將有超連結之標題的網址顯示出來

VBA
原發表者：leonchou (2005-06-11)
  1. Sub aa()
  2. Selection.EndKey wdStory '游標移至文件尾端
  3. Selection.TypeParagraph '換行
  4. For Each link In ActiveDocument.Hyperlinks
  5. Selection.TypeText "[*][url=" & link.Address & "]" & _
  6. 　　link.TextToDisplay & "[/url]" & vbLf & vbLf
  7. Next
  8. End Sub
複製代碼
收藏 分享
偉婕電子書,歡迎免費下載參考
http://www.twbts.com/ebook/?subject=office
http://www.twbts.com/ebook/?subject=soft
偉婕藏書庫---https://www.facebook.com/groups/669579416484096/
有一家柑仔店---https://www.facebook.com/sadodona

        靜思自在 : 【時間無法遮擋】怕時間消逝，花了許多心血，想盡各式方法要遮擋時間，結果是：浪費了更多時間，且一無所成！
返回列表 上一主題