テキストからのHTMLタグの削除(Microsoft Word)
アーロンは、多数の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に適用されます。