Hi Francis,

Below is some information I had saved about macros.

Macros for Easy Text Selection in Word



These macros were authored by Ann Lord.  They work in versions of Word at 
least as far back as Word 2000, and up to 2007.  I may or may not provide 
tech support on the procedure outlined below, but it really works if you 
follow the instructions!  You don't need prior macro knowledge.



You may wish to paste this entire document into a blank Word file, since 
we'll be working in Word.



In order to make it possible to effortlessly select text in Word, we're 
going to create two, or perhaps three macros.  If you've never created a 
macro before or are not even sure what one is, don't worry, just follow the 
instructions.  In each case, we'll start Word's macro recorder in order to 
create the "shell" of the macro, then paste in the code.  We'll assign the 
macros to keystrokes.

First, we'll create the macro that marks the start of our selection.



Start the macro recorder by hitting alt+t, m, r.  Word 2007: alt+l, r.  You 
land in an edit box where you need to give the macro a name.  Give it a 
one-word name no longer than eight characters.  I recommend mark.  Then tab 
to the description field and put a meaningful description to replace the 
default one, something like "marks a spot in a document."  Finally, 
shift-tab to the Keyboard button and press space to open that dialog.  Here, 
we will assign the keystroke that will set our invisible mark.  Obviously, 
we want a keystroke that Word and windows do not use.  I choose alt+m. 
Whatever you choose, type the keystroke, use the Jaws or mouse cursor to 
verify that the keystroke is not already assigned to another command, tab to 
the assign button and hit space, then tab to the close button and hit space.



Now we're recording keystrokes, and we have no intention of actually 
recording any, so hit alt+t, m, down arrow once to the line that says Stop 
Recording,  and hit Enter.  Word 2007 users, hit alt+l, r again.



Now we have created the framework of our macro, so we need to put in the 
text.  First, we want to copy the code to the clipboard.  this first macro 
consists of two lines.  After these sentences of directions, down arrow to 
the line that starts 'on error,' ensure that you are at the start of the 
line by hitting the home key, and hit shift-down arrow  twice to select the 
two lines.  Hit ctrl-c to copy them to the clipboard.



    on error resume next

    ActiveDocument.Bookmarks.Add Range:=Selection.Range, Name:="Start"



Now, with the code safely waiting on the clipboard, let's go find our macro. 
Hit alt+f8 to bring up the list of macros.  Find the one we just created by 
arrowing through the list.  For this illustration, I'll assume we called it 
mark.  with that name highlighted, hit alt+e to open the edit dialog.



Now we're in the Visual Basic Editor.  This is likely an unfamiliar place, 
but fear not!  Down arrow to the line that says END Sub.  With the cursor at 
the beginning of that line, hit Enter, then up arrow to place you on a blank 
line, then paste with ctrl-v the code we copied before.  Finally, hit ctrl-s 
to save, then alt+q to quit and return to Word.



Now it's time to create the second macro.  This macro assumes that you will 
set the mark, then read downward to find the end of the text you want to 
select.  So here we go again.  Press alt+t, m, r to start the macro 
recorder, unless you're using Word 2007, in which case you hit alt+l, r. 
give the macro a short name; I use seldown.  Tab to the description field 
and write a description, then shift-tab to the keyboard button and press 
space.  In the keyboard dialog, assign a shortcut key by typing it.  I use 
alt+s for 'select.'  Press the Assign and Close buttons.



Now we're recording, so let's stop that process by hitting alt+t, m, then 
down arrow and enter to stop recording.  Again, if you're using Word 2007, 
hit alt+l, r.



Now let's copy the macro code to the clipboard.  the code below has seven 
lines and

starts dim rngRange.  Copy those seven lines to the clipboard by hitting 
shift-down arrow seven times from the start of the code, then hitting 
ctrl-c.



    Dim rngRange As Range

    On Error Resume Next

    ActiveDocument.Bookmarks.Add Range:=Selection.Range, Name:="End"

    Set rngRange = ActiveDocument.Range( _

        Start:=ActiveDocument.Bookmarks("Start").Range.Start, _

        End:=ActiveDocument.Bookmarks("End").Range.End)

    rngRange.Select



with this safely on the clipboard, hit alt+f8 to access the list of macros. 
Find our latest macro in the list and hit alt+e to edit it.  Again, down 
arrow to the line that says End Sub, hit enter then up arrow to place 
yourself on a blank line, and paste the code with ctrl-v.  Hit ctrl-s to 
save alt alt+q to quit and go back to Word.



Note that these macros work by creating bookmarks in the document.  As far 
as Word is concerned, you will have modified the document even if you 
haven't made any changes, so it will offer to save your changes when you 
close the document.



Now you're probably done, and can test the macros.  There is one more macro 
if you want it.  This macro assumes that you would set the mark, then look 
upward through the document to find where to select.  Most of us don't work 
this way.  By now, you have the routine down, or can look back at how we did 
it before, so I'll just give you the code for this third macro to paste in 
if you want it:



    Dim rngRange As Range

    On Error Resume Next

    ActiveDocument.Bookmarks.Add Range:=Selection.Range, Name:="End"

    Set rngRange = ActiveDocument.Range( _

        Start:=ActiveDocument.Bookmarks("End").Range.Start, _

        End:=ActiveDocument.Bookmarks("Start").Range.End)

    rngRange.Select



Hope this helps a little bit.  Take care.

Mike



  ----- Original Message ----- 
  From: Francis Khan
  To: [email protected]
  Sent: Tuesday, July 12, 2011 12:19 PM
  Subject: Re: [JAWS-Users] Line Spacing in Word


  Thanks for the information.  I learnte something new today.  What I need 
to
  do is to learn how to use macros to do my work better and faster.

  Are there any tutorials on this?
  ----- Original Message ----- 
  From: "Mike & Barbara In Arcadia" <[email protected]>
  To: <[email protected]>
  Sent: Tuesday, July 12, 2011 2:55 PM
  Subject: Re: [JAWS-Users] Line Spacing in Word


  > Hi Francis,
  >
  > Ann & Flor had the answers.
  > From: Ann Byrne
  > It's under format / paragraph / alignment.
  > Ann
  >
  > From: Flor Lynch
  > Mike:
  >
  > Format; paragraph; Spacing and indents tab: there, Press the tab key
  > about nine times, to get to the combo box.
  > Flor
  >
  > Hope this helps.  Take care.
  > Mike
  >
  >
  >
  >  ----- Original Message ----- 
  >  From: Francis Khan
  >  To: [email protected]
  >  Sent: Tuesday, July 12, 2011 11:33 AM
  >  Subject: Re: [JAWS-Users] Line Spacing in Word
  >
  >
  >  If you find the answer, please pass it on
  >  ----- Original Message ----- 
  >  From: "Mike & Barbara In Arcadia" <[email protected]>
  >  To: <[email protected]>
  >  Sent: Tuesday, July 12, 2011 2:29 PM
  >  Subject: Re: [JAWS-Users] Line Spacing in Word
  >
  >
  >  > Hi Francis,
  >  >
  >  > Thank you for this but, I am wanting to know where to go in Word to
  > change
  >  > line spacing manually.  My Control + 1 & 2 keystrokes are assigned 
for
  >  > other
  >  > tasks via the script manager.  Thanks much, take care.
  >  > Mike
  >  >
  >  >  ----- Original Message ----- 
  >  >  From: Francis Khan
  >  >  To: [email protected]
  >  >  Sent: Tuesday, July 12, 2011 11:13 AM
  >  >  Subject: Re: [JAWS-Users] Line Spacing in Word
  >  >
  >  >
  >  >  Ctrl-1 for normal typing
  >  >  ctrl-2 for double spacing and
  >  >  ctrl-5 for 1 and a half spacing.
  >  >
  >  >  That is how I do it.
  >  >  ----- Original Message ----- 
  >  >  From: "Mike & Barbara In Arcadia" <[email protected]>
  >  >  To: "Jaws-Users List" <[email protected]>
  >  >  Sent: Tuesday, July 12, 2011 1:43 PM
  >  >  Subject: [JAWS-Users] Line Spacing in Word
  >  >
  >  >
  >  >  > Hi All,
  >  >  >
  >  >  > If I want to change my line spacing in Word 2002 manually, how 
would
  > I
  >  > do
  >  >  > it?  I have looked in formatting & several other places but, can't
  > seem
  >  > to
  >  >  > find anything for changing line spacing.  I know about using 
Control
  > +
  >  > 1
  >  > &
  >  >  > control + 2 for single / double line spacing but, I'm wanting to
  > learn
  >  >  > where
  >  >  > to do it manually.  I'm running XP & Office Home with Jaws 10
  > latest.
  >  > All
  >  >  > help will be graciously accepted.  Thanks much, take care.
  >  >  > Mike
  >  >  > For answers to frequently asked questions about this list visit:
  >  >  > http://www.jaws-users.com/help/
  >  >
  >  >
  >  >  For answers to frequently asked questions about this list visit:
  >  >  http://www.jaws-users.com/help/
  >  > For answers to frequently asked questions about this list visit:
  >  > http://www.jaws-users.com/help/
  >
  >
  >  For answers to frequently asked questions about this list visit:
  >  http://www.jaws-users.com/help/
  > For answers to frequently asked questions about this list visit:
  > http://www.jaws-users.com/help/


  For answers to frequently asked questions about this list visit:
  http://www.jaws-users.com/help/ 
For answers to frequently asked questions about this list visit:
http://www.jaws-users.com/help/

Reply via email to