Sauter une ligne en fin de phrase VBA

Bonjour,

J'ai créé une macro sous word 2003 (en piquant des idées à droite à gauche sur les forums !) afin de remplacer les paragraphes de texte en italique par des pointillés. Je précise que je débute tout juste sur VBA

Voilà mon code :

With Selection.Find
.ClearFormatting
.Text = ""
.MatchWildcards = False
.Forward = True
.Font.Italic = 1
.Replacement.Text = "............................................................................................................................"
.Execute Replace:=wdReplaceAll
End With
End Sub


Je voudrais simplement sauter une ligne après et les pointillés... mais je n'y arrive pas ! J'ai essayé d'jouter &"^1", ça ne fonctionne pas et j'ai essayé d'ajouter Selection.TypeParagraph mais la ligne saute avant les pointillés...

Merci de votre indulgence pour une novice !!! ;p