通常、入力時にテキストに引用符を追加します。ただし、後で引用符を追加したい場合があります。

たとえば、ドキュメントの編集中にテキストを選択してから、選択したテキストの周囲に引用符を追加することができます。このタスクは、次のマクロを使用して実行できます。

Sub AddQuotes()

Dim sBegQ As String     Dim sEndQ As String

If Options.AutoFormatAsYouTypeReplaceQuotes Then         sBegQ = Chr(147)

sEndQ = Chr(148)

Else         sBegQ = Chr(34)

sEndQ = Chr(34)

End If

Selection.InsertBefore sBegQ     Selection.InsertAfter sEndQ End Sub

マクロは、WordのSmartQuotesがオンになっているかどうかに基づいて、使用する引用符の適切なタイプを決定します。次に、選択の前後に適切な引用符が配置されます。

注：

このページ（または_WordTips_サイトの他のページ）で説明されているマクロの使用方法を知りたい場合は、役立つ情報を含む特別なページを用意しました。

linkここをクリックして、新しいブラウザタブでその特別なページを開きます。

_WordTips_は、費用効果の高いMicrosoftWordトレーニングのソースです。

（Microsoft Wordは、世界で最も人気のあるワードプロセッシングソフトウェアです。）このヒント（13326）は、Microsoft Word 2007、2010、2013、2016、2019、およびOffice 365のWordに適用されます。このヒントのバージョンは、ここにWordの古いメニューインターフェイス：

link引用符の追加。