ヒント:他の言語はGoogle翻訳されています。 訪問することができます English このリンクのバージョン。
ログイン
x
or
x
x
LPI ID 登録
x

or

真っ直ぐな引用符を単語の中かっこに変更するには?

通常、Microsoft Wordは自動的に直線引用符を変更します ひざまずいている(スマートなまたはテクニカティブの)引用符 あなたが入力するときに。 しかし、機能がオフになっている場合は、一重引用符と二重引用符の両方がドキュメント内でまっすぐに表示されることがあります。 ここでは、引用符を中括弧に変更したり、その逆をWordで変更したりするヒントを紹介します。

直進引用符で囲んで引用符を検索して置換

VBAを使って直線引用符を中括引用符に変更する


矢印青い右の泡 FindとReplaceを使用して直線引用符を中括引用符に変更する

ホット
すごい! Chrome、Firefox、New Internet ExplorerなどのWord(Office)で効率的なタブを使用してください。

詳しくはこちら 無料ダウンロード

申請する前に 検索および置換、あなたに行く必要があります 自動修正オプション のチェックを外す "ストレート引用符"と "スマート引用符" チェックボックスをオンにします。

Word 2003では、 自動修正オプション 下にあります ツール バー。 そしてWord 2007では、 自動修正オプション クリックして > オプション > 校正 > 自動修正オプション。 ここではWord 2010 / 2013を例にとります:

ステップ1。 クリック > オプション > 校正 > 自動修正オプション > 入力時のオートフォーマット、および選択 "ストレート引用符"と "スマート引用符" チェックボックスをオンにします。 スクリーンショットを見る:

ステップ2。 クリック ホーム > 交換します の中に 編集 グループまたはプレス Ctrl + H 表示する 検索および置換 ダイアログを開き、Enterを押します 'or '' in 見つける ボックスに移動して入力します ' or 「」in と交換 ボックス。 スクリーンショットを見る:

ステップ3。 クリック すべて置換.

注意: すべての中かっこをまっすぐ引用符で置き換えたい場合は、クリアしてください "ストレート引用符"と "スマート引用符" チェックボックス)。


矢印青い右の泡 VBAを使って直線引用符を中括引用符に変更する

Word 2010ですべての直線引用符をVBAで置き換えるには、をクリックしてください フィレット> オプション > 校正 をクリックし オートコレクト オプション 選択 "ストレート引用符"と "スマート引用符" チェックボックスをオンにします。 (:すべての中かっこをまっすぐ引用符で置き換えたい場合は、 "ストレート引用符"と "スマート引用符"チェックボックスをクリアしてください)。

ステップ1:Alt-F11"アプリケーションウィンドウのMicrosoft Visual Basicを開きます。

ステップ2:クリック モジュール オン インセット タブで、次のVBAコードをコピーして モジュール 窓;

ステップ3:をクリックします。 ラン ボタンを押してVBAを適用します。

次のVBAは、ストレート引用符を中引用に変更することです。

Sub ChangeDoubleStraightQuotes()
'Update 20131107
Selection.Find.ClearFormatting
Selection.Find.Replacement.ClearFormatting
With Selection.Find
.Text = """"
.Replacement.Text = """"
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord =False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
End Sub

次のVBAは、中括弧を直接引用符に変更することです。

Sub ReplaceSmartQuotes()
Dim vFindText As Variant
Dim vReplText As Variant
Dim i As Long
vFindText = Array("[^0145^0146]", "[^0147^0148]")
vReplText = Array("^039", "^034")
With Selection.Find
.ClearFormatting
.Replacement.ClearFormatting
.Forward = True
.Wrap = wdFindContinue
.MatchWholeWord = True
.MatchWildcards = True
For i = LBound(vFindText) To UBound(vFindText)
.Text = vFindText(i)
.Replacement.Text = vReplText(i)
.Execute Replace:=wdReplaceAll
Next i
End With
End Sub



おすすめのWord生産性向上ツール

Word用Kutools-Wordの100の高度な機能以上に、50%の時間を節約できます

  • 複雑で繰り返しのある操作は、数秒で1回の処理で実行できます。
  • 一度にWord文書にフォルダ間で複数の画像を挿入します。
  • フォルダ間の複数のWordファイルを希望の順序で1つに結合します。
  • 見出し、セクション区切り、またはその他の基準に従って、現在のドキュメントを個別のドキュメントに分割します。
  • DocとDocx、DocxとPDF、一般的な変換と選択のためのツールのコレクションなどの間でファイルを変換する...
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Sri · 11 months ago
    The VBA code method for changing "straight" to "smart" quotes worked perfectly! Thank you!
  • To post as a guest, your comment is unpublished.
    no name · 1 years ago
    My problem is that I have work normally in German but have an English document, which I marked as "English". Then I did find&replace and it converted them to lower " and upper " as it would happen in German. I looked at all the settings but I couldn't find it. I changed the dictionary language and everything else I could find to English... any idea?
  • To post as a guest, your comment is unpublished.
    Bill Smith · 5 years ago
    Your explanation for replacing in Find/Replace from instruction #2 on is completely incomprehensible.
    • To post as a guest, your comment is unpublished.
      Dustin · 4 years ago
      I think I found the explanation on another page. If you simply do a replace all and ask it to replace either single quotes or double quotes with the exact same symbol, it will go through and apply your autocorrect rules, including to replace straight quotes with smart quotes. So it should update those all to smart quotes as it goes.