Selection.CreateTextbox (Word)
Zieht ein Textfeld mit Standardgröße um die Markierung.
Wenn es sich bei der Markierung um eine Einfügemarke handelt, ändert diese Methode den Zeiger in ein Fadenkreuz, sodass der Benutzer das Textfeld zeichnen kann. Diese Methode hat dieselben Auswirkungen wie das Klicken auf die Schaltfläche Textfeld auf der Symbolleiste Zeichnen.
If Selection.Type = wdSelectionNormal Then
Selection.CreateTextbox
Selection.ShapeRange(1).Line.DashStyle =msoLineDashDot
End If