Tim có một danh sách các mục trong tài liệu Word. Mỗi mục nằm trong đoạn văn riêng của nó (Nhập ở cuối) và không nằm trong bảng. Một số mục (đoạn văn) có tô sáng được áp dụng cho chúng. Tim tự hỏi liệu có cách nào để sắp xếp các đoạn văn để các đoạn được đánh dấu gần nhau không. Nói cách khác, anh ta cần sắp xếp theo đánh dấu làm khóa sắp xếp chính.

Word có thể sắp xếp theo nhiều thứ nhưng sắp xếp bằng cách tô sáng không phải là một trong những thứ đó. Tuy nhiên, Tìm & Thay thế có thể tìm kiếm đánh dấu. Một phương pháp sẽ là sử dụng Tìm & Thay thế để đặt tiền tố cho mỗi đoạn được đánh dấu bằng một từ khóa duy nhất, chạy Tìm & Thay thế một lần nữa để đặt tiền tố cho các đoạn không được đánh dấu bằng một từ khóa khác, sau đó sắp xếp tài liệu bằng từ đầu tiên làm khóa đầu tiên để được đánh dấu các đoạn văn nằm với nhau. Sau đó, chạy Tìm & Thay thế để loại bỏ hai từ khóa đặc biệt. Rõ ràng, phương pháp này khó thiết lập và yêu cầu một số bước.

Một cách tiếp cận khác là sắp xếp tất cả các đoạn văn một cách đơn giản, không quan tâm đến phần đánh dấu. Sau khi hoàn tất, bạn có thể sử dụng macro để di chuyển các đoạn được đánh dấu đến đầu tài liệu. Các đoạn được đánh dấu sẽ xuất hiện theo thứ tự được sắp xếp mà chúng có trong tài liệu.

Sub MoveHighlightedParas()

Dim paraMax As Long     Dim paraStart As Long     Dim j As Long     Dim r As Range

With ActiveDocument         paraMax = .Paragraphs.Count         paraStart = 0         j = paraMax         Do While j > paraStart             If .Paragraphs(j).Range.HighlightColorIndex <> wdNoHighlight Then                 .Paragraphs(j).Range.Cut                 Set r = .Content                 r.Collapse                 r.Paste                 paraStart = paraStart + 1             Else                 j = j - 1             End If         Loop     End With 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 (13272) áp dụng cho Microsoft Word 2007, 2010, 2013, 2016, 2019 và Word trong Office 365.