ID: Q89376
The information in this article applies to:
To move the insertion point to the beginning or end of the current paragraph using the Microsoft WordBasic language, you must combine a series of WordBasic commands.
WARNING: ANY USE BY YOU OF THE CODE PROVIDED IN THIS ARTICLE IS AT YOUR OWN RISK. Microsoft provides this macro code "as is" without warranty of any kind, either express or implied, including but not limited to the implied warranties of merchantability and/or fitness for a particular purpose.
Use the appropriate macro below to move the insertion point to the beginning or end of a paragraph.
NOTE: If the insertion point is already at the beginning of the paragraph it is not moved.
Sub MAIN
CharLeft 1, 1
If Selection$() <> Chr$(13) Then
ParaUp 1
Else
CharRight 1
End If
End Sub
If you are using Word version 2.x for Windows, change the If statement
above to read as follows:
If Selection$() <> Chr$(13) + Chr$(10) Then
Sub MAIN
EditGoTo "\para"
CharRight
CharLeft
End Sub
The following WordBasic command can be used to select the paragraph of text where the insertion point is located.
EditGoto "\Para"
"Using WordBasic," by WexTech Systems and Microsoft, page 184
Additional query words: start winword
Keywords : kbmacro wordnt kbmacroexample winword ntword macword word6 winword2 word7 word95
Version : WINDOWS:2.0,2.0a,2.0a-CD,2.0b,2.0c,6.0,6.0a,6.0c,7.0,7.0a; MACINTOSH:6.0,6.0.1,6.0.6.0.1a
Platform : MACINTOSH Win95 WINDOWS winnt
Issue type : kbhowto
Last Reviewed: February 4, 1998