アーロンは、多数のHTMLタグを含むドキュメントを持っており、タグを削除したいが、タグが表すフォーマットは維持したいと考えています。たとえば、このように表示される_aphrase_がある場合、タグ(and)を削除したいが、「aphrase」はイタリック体で表示されます。アーロンは、これが検索と置換で実行できることをかなり確信していますが、それをどのように実行するかについてはよくわかりません。

そうです、アーロン—検索と置換を使用して削除を実行できます。あなたがそれをする方法はこれらのステップに従うことです:

。 Ctrl + Hを押します。 Wordは、[検索と置換]ダイアログボックスの[置換]タブを表示します。

。利用可能な場合は、[その他]ボタンをクリックします。 (図1を参照)

。 [ワイルドカードを使用する]チェックボックスがオンになっていることを確認します。

。 [検索する文字列]ボックスに、次のように入力します:\ <i \>([!<] @)\。 [置換]ボックスに、次のように入力します:\ 1。 [置換]ボックスに挿入ポイントが残っている状態で、Ctrl + Iを1回押します。 「斜体」というテキストは、「置換」ボックスのすぐ下に表示されます。

。 [すべて置換]をクリックします。

[検索する文字列]ボックス(手順4)に入力するコードは、少し気が遠くなるように見える場合があります。 Wordに指示しているのは、開始HTMLタグ()の後に任意の数の文字が続き、終了HTMLタグ()で終わることだけです。 [置換]ボックスの非常に短いエントリ(ステップ5)

見つかったものを、かっこで囲まれた[検索する文字列]ボックスの最初の要素の内容に置き換えることを単に言います。これは、たまたま2つのHTMLタグ間のテキストです。

[検索する文字列]ボックスの内容を常に覚えておく(または検索する)必要をなくしたい場合は、[検索と置換]操作をマクロに配置できます。

Sub ConvertItalicTags()

Selection.Find.ClearFormatting     Selection.Find.Replacement.ClearFormatting     Selection.Find.Replacement.Font.Italic = True     With Selection.Find         .Text = "\<i\>([!<]@)\"

.Replacement.Text = "\1"

.Forward = True         .Wrap = wdFindContinue         .Format = True         .MatchCase = False         .MatchWholeWord = False         .MatchAllWordForms = False         .MatchSoundsLike = False         .MatchWildcards = True     End With     Selection.Find.Execute Replace:=wdReplaceAll End Sub

マクロをショートカットキーに割り当てると、必要なときにいつでも斜体のHTMLタグを削除できます。マクロを展開して、削除する必要のある他のHTMLタグと比較して同様の変更を加えることもできます。代替タグが処理されていることを確認することもできます。たとえば、HTMLは_タグと_タグの両方を使用して情報をイタリックで表示します。つまり、マクロ内の両方のタグセットの可能性を考慮する必要があります。__

もちろん、HTMLタグを取り除き、それらのタグに関連付けられたフォーマットを保持するために使用できるまったく異なるアプローチがあります。これは、HTMLでエンコードされたテキストをテキストファイルに保存し、ブラウザで開き、ブラウザウィンドウ内でテキストをコピーして、Word文書に直接貼り付けることです。すべてがうまくいけば、完成したドキュメントに希望のフォーマットのテキストができあがります。

注:

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

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

(Microsoft Wordは、世界で最も人気のあるワードプロセッシングソフトウェアです。)このヒント(10308)は、Microsoft Word 2007、2010、2013、2016、2019、およびOffice365のWordに適用されます。