This example causes text to not wrap around the first frame in the active document.
If ActiveDocument.Frames.Count >= 1 Then
ActiveDocument.Frames(1).TextWrap = False
End If
This example causes text to wrap around all frames in the active document.
For Each aFrame In ActiveDocument.Frames
aFrame.TextWrap = True
Next aFrame