以前は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ここをクリックして、新しいブラウザタブでその特別なページを開きます。

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

（Microsoft Wordは、世界で最も人気のあるワードプロセッシングソフトウェアです。）このヒント（187）は、Microsoft Word 97、2000、2002、および2003に適用されます。Wordのリボンインターフェイス（Word 2007）用のこのヒントのバージョンを見つけることができます。以降）ここ：

linkASCIIファイルを自動的にフォーマットする。