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

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

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は、世界で最も人気のあるワードプロセッシングソフトウェアです。）このヒント（9）は、Microsoft Word 97、2000、2002、および2003に適用されます。

Word（Word 2007以降）のリボンインターフェイスに関するこのヒントのバージョンは、次の場所にあります：

link引用符の追加。