The topic you requested is included in another documentation set. For convenience, it's displayed below. Choose Switch to see the topic in its original location.

CreateTextbox Method

Adds a default-size text box around the selection. If the selection is an insertion point, this method changes the pointer to a cross-hair pointer so that the user can draw a text box.


expression   Required. An expression that returns a Selection object.


Using this method is equivalent to clicking the Text Box button on the Drawing toolbar. A text box is a rectangle with an associated text frame.


This example adds a text box around the selection and then changes the text box's line style.

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