I want to add a hyperlink to this : tdm.Paragraphs.InsertAfter (Pres.Slides(j).Shapes(1).TextFrame.TextRange.Text & Chr(13))
But, when I add Hyperlink.subAdress = j
I got a compilation problem.

tdm is a textRange