2013-10-29 94 views
0

我有一个字符串在vba中有一个网页链接。但是,该字符串显示在Microsoft Word页面上时。文本被封装并且链接被破坏。我如何确保VBA知道链接开始和停止的位置?嵌入网络链接的问题

字符串如下所示:

Dim My_MSG As String 
My_MSG = "Full company list can be found at finance.yahoo.com/blogs/hot-stock-minute/… by yahoo' by yourclients." 

当此字符串在字表填充它的链接剂量无法识别完整的链接

+0

你能分享字符串吗?以及如何使用VBA写字符串 –

+0

my_msg =“文本....链接..文本...” –

+0

您可以请更详细解释?也许你可以修改你的问题,告诉我们你正在使用的确切代码+ Weblink? –

回答

0

Word将不能自动识别的链接。您可以使用Hyperlinks.Add来插入超链接。这是一个例子。

Sub AddTextwHyperlink() 
    Dim objDoc As Document 
    Dim objRng As Range 

    Set objDoc = ActiveDocument 
    Set objRng = Selection.Range 

    'Adds text before link. 
    objRng.InsertAfter "Full company list can be found at " 

    'Collapses range so that hyperlink will be added after text. 
    objRng.Collapse wdCollapseEnd 

    'Adds hyperlink and sets the range to start after the hyperlinked text. 
    objRng.start = objDoc.Hyperlinks.Add(Anchor:=objRng, Address:="http://finance.yahoo.com/blogs/hot-stock-minute/").Range.End 

    'Adds the rest of the text. 
    objRng.InsertAfter " by yahoo' by yourclients." 

End Sub