Một trong những vấn đề lớn nhất trong việc định dạng tệp ASCII trước đây là sửa đổi nó để chỉ có các kết quả trả về ở cuối đoạn văn. Hầu hết các tệp ASCII có một trả về cố định ở cuối mỗi dòng của tệp và hai trả về cố định ở cuối mỗi đoạn. Nếu bạn có tệp ASCII được định dạng như thế này, chẳng hạn như tệp bạn đã tải xuống từ Internet, thì macro sau sẽ là vô giá. Nó định dạng toàn bộ một tệp vì vậy chỉ có các dấu trả về cứng ở cuối các đoạn.

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

Bạn nên chạy macro ConvertASCII. Nó gọi macro Fmt nhiều lần để thay thế các kết hợp khác nhau của các ký tự trả về để đạt được kết quả mong muốn.

_Lưu ý: _

Nếu bạn muốn biết cách sử dụng các macro được mô tả trên trang này (hoặc trên bất kỳ trang nào khác trên các trang WordTips), tôi đã chuẩn bị một trang đặc biệt bao gồm thông tin hữu ích.

WordTips là nguồn của bạn để đào tạo Microsoft Word hiệu quả về chi phí.

(Microsoft Word là phần mềm xử lý văn bản phổ biến nhất trên thế giới.) Mẹo này (187) áp dụng cho Microsoft Word 97, 2000, 2002 và 2003. Bạn có thể tìm thấy phiên bản của mẹo này cho giao diện ribbon của Word (Word 2007 và sau này) tại đây: