Ms word 宏以在MS Word中粘贴超链接

Ms word 宏以在MS Word中粘贴超链接,ms-word,Ms Word,我想在Word中粘贴链接,但我的代码只粘贴纯文本 Sub test() ActiveDocument.Content.InsertAfter Text:="https://docs.google.com/xxxxxx" End Sub 有人能帮我吗?例如: Sub Demo() With ActiveDocument .Hyperlinks.Add .Characters.Last, "https://docs.google.com/xxxxxx",

我想在Word中粘贴链接,但我的代码只粘贴纯文本

Sub test()
ActiveDocument.Content.InsertAfter Text:="https://docs.google.com/xxxxxx"
End Sub
有人能帮我吗?

例如:

Sub Demo()
With ActiveDocument
  .Hyperlinks.Add .Characters.Last, "https://docs.google.com/xxxxxx", , , "Google Docs"
End With
End Sub