Selection.CreateTextbox (Word)

Ajoute une zone de texte dont la taille est définie par défaut autour de la sélection.

Si la sélection est un point d'insertion, cette méthode remplace le pointeur par un pointeur en croix de sorte que l'utilisateur puisse tracer une zone de texte. L'utilisation de cette méthode équivaut à cliquer dans la barre d'outils Dessin sur le bouton Zone de texte.

If Selection.Type = wdSelectionNormal Then 
 Selection.CreateTextbox 
 Selection.ShapeRange(1).Line.DashStyle =msoLineDashDot 
End If