Có lẽ tôi là một trong những kiểu người bị ám ảnh cưỡng chế, nhưng tôi luôn xem qua các tài liệu của mình để đảm bảo rằng không có dấu cách ở cuối đoạn văn. Điều này làm cho tài liệu gọn gàng hơn và nhỏ hơn. Nếu bạn định dạng tệp ASCII hoặc tài liệu bạn nhận được từ người khác, bạn sẽ cần tìm kiếm các khoảng trống ở cuối và xóa chúng khi bạn định dạng tệp cho Word. Macro sau, StripSpaces, lấy đi tất cả các khoảng trắng trước dấu đoạn và ngắt dòng thủ công trong toàn bộ tài liệu của bạn.

Sub StripSpaces()

Selection.HomeKey Unit:=wdStory     Selection.Find.ClearFormatting     Selection.Find.Replacement.ClearFormatting     With Selection.Find         .Text = " ^p"

.Replacement.Text = "^p"

.Forward = True         .Wrap = wdFindContinue         .Format = False         .MatchWholeWord = False         .MatchWildcards = False     End With     Selection.Find.Execute     While Selection.Find.Found         Selection.HomeKey Unit:=wdStory         Selection.Find.Execute Replace:=wdReplaceAll         Selection.Find.Execute     Wend

Selection.Find.Text = " ^l"

Selection.Find.Replacement.Text = "^l"

Selection.Find.Execute     While Selection.Find.Found         Selection.HomeKey Unit:=wdStory         Selection.Find.Execute Replace:=wdReplaceAll         Selection.Find.Execute     Wend End Sub

_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 (13376) áp dụng cho Microsoft Word 2007, 2010, 2013, 2016, 2019 và Word trong Office 365. Bạn có thể tìm thấy phiên bản của mẹo này cho giao diện menu cũ hơn của Word tại đây: