copy words as you type

V

VictoriaW

As one types there should be a simple way to begin and end copying a word or
phrase for later playback. This would differ from highlighting in that it
could be done right when you are typing and without lifting the fingers from
the keyboard. For example, I know I am typing a phrase or name I am likely
to need to insert into my document again, and I would like to be able to
easily click something, type it, and click again, and that name or phrase
would be highlighted just as if I had used the mouse. This is a feature from
the IBM Displaywriter, and it saved a lot of time which is now taken having
to go back and do after having typed it already.

----------------
This post is a suggestion for Microsoft, and Microsoft responds to the
suggestions with the most votes. To vote for this suggestion, click the "I
Agree" button in the message pane. If you do not see the button, follow this
link to open the suggestion in the Microsoft Web-based Newsreader and then
click "I Agree" in the message pane.

http://www.microsoft.com/office/com...38abf63d&dg=microsoft.public.word.vba.general
 
J

Jay Freedman

After you've typed the word or phrase, press Ctrl+Shift+left arrow
once (or once for each word in the phrase) and the text will be
highlighted. Then you can press Ctrl+C to copy, and later press Ctrl+V
to paste. No mouse needed... and it works in almost every Windows
program.

--
Regards,
Jay Freedman
Microsoft Word MVP
Email cannot be acknowledged; please post all follow-ups to the
newsgroup so all may benefit.
 
P

Pesach Shelnitz

Hi Victoria,

I think that you can have the functionality that you are requesting by
assigning the following two macros to shortcut keys, pressing the shortcut
key for the first macro (StartSelecting) when you start to type a word or
phrase that you want to playback later, and pressing the shortcut key for the
second macro (CopySelection) when you finish typing the word or phrase.

Sub StartSelecting()
With ActiveDocument
If .Bookmarks.Exists("StartOfSelection") = True Then
.Bookmarks("StartOfSelection").Delete
End If
.Bookmarks.Add name:="StartOfSelection", _
Range:=Selection.Range
End With
End Sub

Sub CopySelection()
Dim myRange As Range

Set myRange = ActiveDocument.Range
With ActiveDocument
If .Bookmarks.Exists("StartOfSelection") = True Then
WordBasic.EditOfficeClipboard
myRange.start = .Bookmarks("StartOfSelection").start
myRange.End = Selection.End
myRange.Copy
.Bookmarks("StartOfSelection").Delete
Else
MsgBox ("The start of the selection could not be found.")
End If
End With
Set myRange = Nothing
End Sub

Note that the second macro opens the Office Clipboard task pane. This is
done so that you can copy several different selections to the clipboard and
have them available for pasting later on. You can learn more about using the
Office Clipboard in Word from the page that I wrote at
http://makeofficework.com/copying_and_pasting.htm.
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top