Share via

select text for quotation marks

Anonymous
2010-08-13T22:04:32+00:00

Is anyone aware of a way to  have quotation marks inserted at the beginning and end of selected text in Outlook 2007?

Thank you.

Cathy

Microsoft 365 and Office | Word | For home | Windows

Locked Question. This question was migrated from the Microsoft Support Community. You can vote on whether it's helpful, but you can't add comments or replies or follow the question.

0 comments No comments

Answer accepted by question author

Doug Robbins - MVP - Office Apps and Services 323.1K Reputation points MVP Volunteer Moderator
2010-08-16T23:29:19+00:00

You will find the codes in the Insert Symbol dialog when the From: drop down is showing ASCII (decimal)

The following is a bit neater code for inserting parentheses before and after the selection

With Selection

    .InsertBefore Chr(40)

    .InsertAfter Chr(41)

End With

For square brackets []

With Selection

    .InsertBefore Chr(91)

    .InsertAfter Chr(93)

End With

For curly brackets { }

With Selection

    .InsertBefore Chr(123)

    .InsertAfter Chr(125)

End With

For En dash

With Selection

    .InsertBefore Chr(150)

    .InsertAfter Chr(150)

End With

For Em dash

With Selection

    .InsertBefore Chr(153)

    .InsertAfter Chr(153)

End With

For chevrons «»

With Selection

    .InsertBefore Chr(171)

    .InsertAfter Chr(187)

End With

-- Hope this helps.

Doug Robbins - Word MVP,

dkr[atsymbol]mvps[dot]org

Posted via the Community Bridge

"lemon scented" wrote in message news:*** Email address is removed for privacy ***...

Hi Herb,

This is very helpful.

Could you tell me what codes I should use for doing the same thing with parentheses, brackets, en dashes, and en dashes?  Where are the codes found?

Thank you.

Cathy


Doug Robbins - Word MVP dkr[atsymbol]mvps[dot]org

Was this answer helpful?

0 comments No comments

Answer accepted by question author

Anonymous
2010-08-14T01:20:06+00:00

You can use a macro. Here's the one I use:

Sub QuoteIt()

    Selection.Copy

    Selection.TypeText Text:=Chr$(147) + Chr$(148)

    Selection.MoveLeft Unit:=wdCharacter, Count:=1

    Selection.Paste

    Selection.MoveRight Unit:=wdCharacter, Count:=1

End Sub

This one inserts directional quotes. If you prefer non-directional, replace both Chr$(147) and Chr$(148) with Chr$(34).


Herb Tyson Microsoft Word MVP

Herb Tyson Word Bible Blog

Was this answer helpful?

0 comments No comments

2 additional answers

Sort by: Most helpful
  1. Anonymous
    2010-08-17T02:10:12+00:00

    Hi Doug,

    Thank you so much.  You are a great fountain of  information!

    Cathy

    Was this answer helpful?

    0 comments No comments
  2. Anonymous
    2010-08-16T19:05:49+00:00

    Hi Herb,

    This is very helpful.

    Could you tell me what codes I should use for doing the same thing with parentheses, brackets, en dashes, and en dashes?  Where are the codes found?

    Thank you.

    Cathy

    Was this answer helpful?

    0 comments No comments