Có nhiều lần khi định dạng của bạn cần đặt một tab bên phải ở lề phải và đảm bảo rằng nó có dấu gạch dưới hoặc dấu chấm trên đó. Điều này được thực hiện khá thường xuyên nếu bạn đang tạo các biểu mẫu được bố trí “thủ công”. Tuy nhiên, việc đặt các tab như vậy có thể phức tạp vì nó liên quan đến việc sử dụng hộp thoại hoặc dải băng và các hành động lặp đi lặp lại.

Nếu bạn đặt khá nhiều tab như vậy, bạn có thể quan tâm đến macro RightTab VBA được hiển thị bên dưới. Khi chạy, nó sẽ kiểm tra từng đoạn bạn đã chọn, xóa tất cả các điểm dừng tab của chúng và đặt một tab bên phải ở lề phải với dấu gạch dưới.

Sub RightTab()

Dim MarPos As Integer, NewPos As Integer     Dim ThisPar As Paragraph

MarPos = Selection.PageSetup.PageWidth - _       Selection.PageSetup.LeftMargin - _       Selection.PageSetup.RightMargin - _       Selection.PageSetup.Gutter

Set myrange = Selection.Range     For Each ThisPar In myrange.Paragraphs         NewPos = MarPos - ThisPar.RightIndent         ThisPar.TabStops.ClearAll         ThisPar.TabStops.Add Position:=NewPos, _           Alignment:=wdAlignTabRight, _           Leader:=wdTabLeaderLines     Next ThisPar End Sub

Macro sẽ hoạt động ngay cả khi các đoạn được chọn có lề phải khác nhau. Nó cũng tính đến thiết lập trang hiện tại của bạn.

Nếu bạn không muốn macro xóa tất cả các điểm dừng tab đã được đặt trong các đoạn đã chọn, hãy xóa dòng sử dụng phương thức ClearAll.

Nếu bạn muốn sử dụng các nhà lãnh đạo dấu chấm trên tab thay vì dấu gạch dưới, thì hãy thay đổi tên hằng số wdTabLeaderLines thành wdTabLeaderDots.

_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 (1875) á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: