click on highlighted word(s) to put in quotes

[Guest]

Is this already possible? If so, how? If not, it would be a handy feature.

----------------
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...a44557&dg=microsoft.public.word.docmanagement

 

[Graham Mayor]

This is fairly easy to achieve. Add the following macro to a keyboard
shortcut

Sub AddQuotes()
Dim sText As String
sText = Selection
'Use this line for straight quotes
Selection.TypeText (Chr(34) & sText & Chr(34))
'Use this line for smart quotes
'Selection.TypeText (Chr(147) & sText & Chr(148))
End Sub

http://www.gmayor.com/installing_macro.htm


--
<>>< ><<> ><<> <>>< ><<> <>>< <>><<>
Graham Mayor - Word MVP

My web site www.gmayor.com

<>>< ><<> ><<> <>>< ><<> <>>< <>><<>