Word VBA Макросы. Как вставить гиперссылку?

[Посетитель]

Как вставить в word-документ гиперссылку с помощью макроса?
Например, как вставить гиперссылку в то место, в котором находится курсор?

[Администратор]

Sub Макрос()
    ActiveDocument.Hyperlinks.Add Anchor:=Selection.Range, Address:="https://forumvba.ru/index.php", _
        SubAddress:="", ScreenTip:="", TextToDisplay:="https://forumvba.ru/index.php"
End Sub

[Посетитель]

спасибо