Làm thế nào để tìm và thay thế nhiều từ cùng một lúc trong tài liệu Word?
Word cung cấp chức năng Tìm và Thay thế để tìm tất cả các trường hợp của một từ hoặc cụm từ và thay thế chúng bằng một từ mới cùng một lúc. Nhưng nếu bạn muốn tìm và thay thế các từ khác nhau cùng lúc, chức năng tích hợp này không thể giúp được. Trong bài viết này, chúng ta đang nói về một phương pháp VBA để tìm và thay thế nhiều từ khác nhau cùng một lúc trong tài liệu Word.
Tìm và thay thế nhiều từ cùng lúc trong Word bằng mã VBA
Dễ dàng tìm và thay thế nhiều từ cùng lúc trong Word với một tính năng tuyệt vời
Tìm và thay thế nhiều từ cùng lúc trong Word bằng mã VBA
Vui lòng thực hiện như sau để tìm và thay thế nhiều từ cùng một lúc trong tài liệu Word.
1. Mở tài liệu Word bạn muốn tìm và thay thế nhiều từ cùng một lúc, sau đó nhấn Khác + F11 phím để mở Microsoft Visual Basic cho các ứng dụng cửa sổ.
2. bên trong Microsoft Visual Basic cho các ứng dụng cửa sổ, nhấp Chèn > Module. Sau đó sao chép mã VBA bên dưới vào cửa sổ Mô-đun.
Mã VBA: Tìm và thay thế nhiều từ cùng một lúc trong Word
Sub FindAndReplaceMultiItems()
'Update by ExtendOffice 2018/10/25
Dim xFind As String
Dim xReplace As String
Dim xFindArr, xReplaceArr
Dim I As Long
Application.ScreenUpdating = False
xFind = InputBox("Enter items to be found here,seperated by comma: ", "Kutools for Word")
xReplace = InputBox("Enter new items here, seperated by comma: ", "Kutools for Word")
xFindArr = Split(xFind, ",")
xReplaceArr = Split(xReplace, ",")
If UBound(xFindArr) <> UBound(xReplaceArr) Then
MsgBox "Find and replace characters must be equal.", vbInformation, "Kutools for Word"
Exit Sub
End If
For I = 0 To UBound(xFindArr)
Selection.HomeKey Unit:=wdStory
With Selection.Find
.ClearFormatting
.Replacement.ClearFormatting
.Text = xFindArr(I)
.Replacement.Text = xReplaceArr(I)
.Format = False
.MatchWholeWord = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
Next
Application.ScreenUpdating = True
End Sub
3. Nhấn nút F5 phím để chạy mã.
4. Trong lần đầu tiên Kutools cho Word hộp thoại, nhập nhiều từ bạn sẽ tìm và thay thế vào hộp văn bản và phân tách chúng bằng dấu phẩy, sau đó nhấp vào OK cái nút. Xem ảnh chụp màn hình:
5. Trong giây Kutools cho Word hộp thoại, nhập các từ mới mà bạn sẽ thay thế bằng (các từ này cũng cần được phân tách bằng dấu phẩy), rồi bấm vào OK .
Lưu ý: Trong trường hợp này, tất cả “KT” trong tài liệu này sẽ được thay thế bằng "Mới", và “KT” và “KTW” sẽ được thay thế bằng "Kiểm tra" và "Hoàn thành". Vui lòng thay đổi chúng theo nhu cầu của bạn.
Dễ dàng tìm và thay thế nhiều từ cùng lúc trong Word với một tính năng tuyệt vời
Sản phẩm Tìm và thay thế hàng loạt tính năng của Kutools cho Word có thể giúp dễ dàng tìm và thay thế các văn bản khác nhau trong một tài liệu hoặc trên nhiều tài liệu cùng một lúc.
Trước khi áp dụng tính năng này, vui lòng dành vài phút để tải xuống và cài đặt nó trước tiên.
1. Khởi chạy ứng dụng Microsoft Word, nhấp vào Kutools Plus > Tìm và thay thế hàng loạt.
2. bên trong Tìm và thay thế hàng loạt cửa sổ, vui lòng cấu hình như sau.
- 2.1 nhấp vào nút> Thêm tập tin or Thêm thư mục để thêm một hoặc nhiều tài liệu mà bạn sẽ tìm và thay thế nhiều từ.
- 2.2 Nhấp vào Thêm dòng để chèn các trường tìm và thay thế. Nếu bạn muốn tìm và thay thế ba văn bản khác nhau cùng một lúc, hãy tạo ba hàng.
- 2.3 Trong mỗi hàng, hãy nhập các từ hiện có mà bạn sẽ thay thế bằng từ mới trong Tìm kiếm và sau đó nhập các từ mới vào Thay thế cột.
- 2.4 Chỉ định Loại tìm kiếm Cho mỗi hàng.
- 2.5 Trong Tìm trong , chọn nơi áp dụng tìm và thay thế. Nó bao gồm Tài liệu chính, Tiêu đề và Footer trong phần này. Bạn có thể chọn một trong số chúng, hai trong số chúng hoặc tất cả chúng dựa trên nhu cầu của bạn.
- 2.6. Nhấp vào Thay thế nút để bắt đầu hoạt động. Xem ảnh chụp màn hình:
Sau đó các từ cụ thể được thay thế trong các tài liệu đã chọn cùng một lúc.
Mẹo: Bạn có thể đánh dấu kết quả bằng màu nền bằng cách chỉ định màu nhất định trong Đánh dấu cột cho một hàng.
Nếu bạn muốn dùng thử miễn phí (60 ngày) tiện ích này, vui lòng nhấp để tải xuống, và sau đó đi đến áp dụng hoạt động theo các bước trên.
Công cụ năng suất văn phòng tốt nhất
Kutools cho Word - Nâng cao trải nghiệm sử dụng từ của bạn với Over 100 Các tính năng đáng chú ý!
🤖 Trợ lý AI của Kutools: Biến đổi bài viết của bạn bằng AI - Tạo nội dung / Viết lại văn bản / Tóm tắt tài liệu / Hỏi thông tin dựa trên tài liệu, tất cả đều có trong Word
📘 Làm chủ tài liệu: Chia trang / Hợp nhất tài liệu / Lựa chọn xuất khẩu ở nhiều định dạng khác nhau (PDF/TXT/DOC/HTML...) / Chuyển đổi hàng loạt sang PDF / Xuất trang dưới dạng hình ảnh / In nhiều tập tin cùng một lúchữu ích. Cảm ơn !
✏ Chỉnh sửa nội dung: Tìm và thay thế hàng loạt trên nhiều tệp / Thay đổi kích thước tất cả hình ảnh / Hoán đổi hàng và cột của bảng / Chuyển bảng thành văn bảnhữu ích. Cảm ơn !
🧹 Dễ dàng làm sạch: Quét đi Không gian bổ sung / Phần ngắt / Tất cả các tiêu đề / Hộp văn bản / Các siêu liên kết / Để biết thêm các công cụ xóa, hãy truy cập Xóa nhómhữu ích. Cảm ơn !
➕ Phụ trang quảng cáo: Chèn Ngàn dấu phân cách / Hộp kiểm tra / Nút radio / Mã QR / Mã vạch / Bảng đường chéo / Chú thích phương trình / Hình ảnh Caption / Bảng chú thích / Nhiều Hình Ảnh / Khám phá thêm trong Chèn nhómhữu ích. Cảm ơn !
???? Lựa chọn chính xác: Xác định trang cụ thể / bảng / hình dạng / đoạn văn tiêu đề / Tăng cường điều hướng với chi tiết Chọn tính nănghữu ích. Cảm ơn !
⭐ Cải tiến sao: Điều hướng nhanh chóng đến bất kỳ vị trí nào / tự động chèn văn bản lặp đi lặp lại / chuyển đổi liền mạch giữa các cửa sổ tài liệu / 11 công cụ chuyển đổihữu ích. Cảm ơn !