以前はASCIIファイルであったものをフォーマットする際の最大の問題の1つは、段落の最後にハードリターンしかないようにファイルを変更することです。ほとんどのASCIIファイルには、ファイルのすべての行の終わりにハードリターンがあり、すべての段落の終わりに2つのハードリターンがあります。インターネットからダウンロードしたものなど、このようにフォーマットされたASCIIファイルがある場合、次のマクロは非常に貴重です。ファイル全体をフォーマットするため、段落の終わりにハードリターンのみがあります。

Sub ConvertASCII()

Fmt "^p^p", "{|}"

Fmt "^p", " {@}"

Fmt " {@}", " "

Fmt "{@}", " "

Fmt "{|}", "^p"

End Sub
Sub Fmt(sFromWord, sToWord)

Set myRange = ActiveDocument.Content     myRange.Find.ClearFormatting     myRange.Find.Execute FindText:=sFromWord, _       ReplaceWith:=sToWord, MatchCase:=0, _       Replace:=wdReplaceAll End Sub

ConvertASCIIマクロを実行する必要があります。 Fmtマクロを数回呼び出して、戻り文字のさまざまな組み合わせを置き換え、目的の結果を取得します。

注:

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

link:/ wordribbon-WordTipsMacros [ここをクリックして、新しいブラウザタブでその特別なページを開きます]

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

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

にあります。 link:/ word-Automatically_Formatting_an_ASCII_File [ASCIIファイルを自動的にフォーマットする]