VisualSelection Property Example
This example sets the selection behavior so that the selection wraps from line to line.
If Options.CursorMovement = wdCursorMovementVisual Then _ Options.VisualSelection = wdVisualSelectionContinuous