2012-10-22 15 views

回答

0

您需要获取关联的WordObject,然后必须将文本与超链接相关联。

你可以做到以下几点:

Dim objInsp as Object, objDoc as Object 
Set objInsp = appointmentItem.GetInspector 
Set objDoc = objInsp.WordEditor 

link = "http://www.yourlink.com" 
linkText = "LinkText" 
Set selection = objDoc.Windows(1).Selection 
objDoc.Hyperlinks.Add selection.Range, link, "", "", linkText, "" 

Reference

+0

非常感谢这个伟大的答案 –

相关问题