Thay thế dấu phẩy cuối (Microsoft Word)
Rebecca đang tìm cách thay thế dấu phẩy cuối cùng trong câu bằng từ “và.” Cô ấy dường như cần thực hiện loại chỉnh sửa này khá nhiều và nghĩ rằng có thể có một cách nhanh chóng và dễ dàng để thực hiện chỉnh sửa thay vì cần phải thực hiện thủ công.
Không có cách cài sẵn nào để thực hiện chỉnh sửa cụ thể này trong Word, nhưng bạn có thể tạo một macro đơn giản sẽ tìm kiếm dấu phẩy cuối cùng, xóa nó rồi nhập từ bạn muốn. Sau đây là một ví dụ về một macro như vậy.
Sub ReplaceLastComma() Dim J As Integer Dim bRep As Boolean Dim sRaw As String Selection.Sentences(1).Select sRaw = Selection.Text bRep = False For J = Len(sRaw) To 1 Step -1 If Mid(sRaw, J, 1) = "," Then Selection.Collapse Direction:=wdCollapseStart Selection.MoveRight Unit:=wdCharacter, Count:=J - 1 Selection.Delete Unit:=wdCharacter, Count:=1 Selection.TypeText Text:=" and" J = 1 bRep = True End If Next J If Not bRep Then Selection.Collapse Direction:=wdCollapseStart End Sub
Macro chọn câu hiện tại (câu nơi đặt điểm chèn, sau đó lùi lại qua văn bản của câu. (Văn bản được gán cho biến sRaw để dễ xử lý.) Nếu tìm thấy dấu phẩy, thì điểm chèn được đặt ngay trước dấu phẩy trong tài liệu, dấu phẩy sẽ bị xóa, sau đó một dấu cách và từ “và” được nhập.
Nếu bạn muốn macro không xóa dấu phẩy, bạn có thể thực hiện thay đổi nhanh chóng khi xóa dòng thực hiện việc xóa (và thay đổi dòng trước nó để chuyển động là “J + 1” chứ không phải “J-1”) hoặc bạn có thể chỉ cần thêm dấu phẩy trước đó khoảng trống trong văn bản đang được nhập bởi macro.
_Lưu ý: _
Nếu bạn muốn biết cách sử dụng macro được mô tả trên trang này (hoặc trên bất kỳ trang khác trên 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 (12378) á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: