CÁCH SỬA dấu ngoặc kép bị đảo ngược trong WORD

Thật ngạc nhiên! Sử dụng các tab một cách hiệu quả trong Word (Office) như Chrome, Firefox và Internet Explorer mới!

Tìm hiểu thêm Tải xuống miễn phí

Trước khi nộp đơn tìm và thay thếBạn nên đến Tuỳ chọn Tự động sửa bỏ chọn “Dấu ngoặc kép” với “dấu ngoặc kép thông minh” hộp kiểm.

Bạn đang xem: Cách khắc phục dấu ngoặc kép trong Word

Trong Word 2003, Tuỳ chọn Tự động sửa nằm dưới Công cụ quán ba. Và trong Word 2007 áp dụng Tuỳ chọn Tự động sửa bằng cách nhấp chuột
> Sự lựa chọn > Hiệu đính > Tuỳ chọn Tự động sửa. Ở đây chúng tôi lấy Word 2010/2013 làm ví dụ:

Bước 1. Nhấp vào
> Quyền mua > Hiệu đính > Tuỳ chọn Tự động sửa > Tự động định dạng khi bạn nhậpvà lựa chọn “Trích dẫn thẳng” với “trích dẫn thông minh” hộp kiểm. Xem ảnh chụp màn hình ：

Bước 2. Nhấp vào Trang chủ > Thay thế Trong Chỉnh sửa nhóm hoặc nhấn Ctrl + Tên để hiển thị tìm và thay thế hộp thoại và nhập “Ở đâu “” để in Để tìm hộp và nhập “ Ở đâu “”để in Được thay thế bởi hộp. Xem ảnh chụp màn hình:

Bước 3. Nhấp vào thay thế tất cả.

Xem thêm: Hướng dẫn sử dụng Power Bank: 10 bước (đính kèm ảnh), Cách nạp tiền Power Bank: 10 bước (đính kèm ảnh)

Thay đổi dấu ngoặc kép thành dấu ngoặc kép với VBA

Để thay thế tất cả các dấu ngoặc kép thẳng bằng dấu ngoặc kép trong Word 2010 bằng VBA, hãy bấm Trường hợp> Quyền mua > Hiệu đính và bấm vào Tự động sửa Sự lựa chọn Và lựa chọn “Dấu ngoặc kép” với “dấu ngoặc kép thông minh” hộp kiểm như sau đầu tiên. (Cần lưu ý: nếu bạn muốn thay thế tất cả các dấu ngoặc kép bằng dấu ngoặc kép, vui lòng bỏ chọn “Trích dẫn dấu ngoặc kép” bằng “dấu ngoặc kép thông minh”).

Bước 1: Nhấn “Alt-F11“Để mở cửa sổ Microsoft Chienlubo.vnsual Basic for Applications;

Bước 2: Nhấp vào Mô-đun ở trên Chèn sao chép và dán mã VBA sau vào Mô-đun Những cửa sổ;

Bước 3: Sau đó nhấp vào Khóa học
để áp dụng VBA.

VBA sau đây thay đổi dấu ngoặc kép thành dấu ngoặc kép:

Sub ChangeDoubleStraightQuotes () “Cập nhật 20131107Selection.Find.ClearFormattingSelection.Find.Replacement.ClearFormattingWith Selection.Find.Text =” “” .Replacement.Text = “” “” .Forward = True.Wrap = wdFindContinse.F MatchCase = False.F MatchCase = False. False.MatchWholeWord = False.MatchWildcards = False.MatchSoundsLike = False.MatchAllWordForms = FalseEnd WithSelection.Find.Execute Replace: = wdReplaceAllEnd Sub

VBA sau đây là để thay thế dấu ngoặc kép bằng dấu ngoặc kép thẳng:

Sub ReplaceSmartQuotes () Dim vFindText As VariantDim vReplText As VariantDim i As LongvFindText = Array (“”, “”) vReplText = Array (“^ 039”, “^ 034”) With Selection.Find.ClearFormatting.Replacement.ClearFormatting.Replacement.ClearFormatting. True.Wrap = wdFindContinue.MatchWholeWord = True.MatchWildcards = TrueFor i = LBound (vFindText) To UBound (vFindText) .Text = vFindText (i) .Replacement.Text = vReplText (i) .Execute Sub Replace: = wdReplace
Kutools cho Word – 100+ tính năng nâng cao cho Word, tiết kiệm 50% thời gian của bạn Các thao tác phức tạp và lặp đi lặp lại có thể được thực hiện một lần trong vài giây. Chèn nhiều hình ảnh vào các mục tin nhắn trong tài liệu Word cùng một lúc. Hợp nhất và kết hợp nhiều tệp Word trên các thư mục thành một với lệnh mong muốn của bạn. Chia tài liệu hiện tại thành các tài liệu riêng biệt theo tiêu đề, ngắt phần hoặc các mục khác. nhiều tiêu chí hơn. Chuyển đổi tệp giữa Doc và Docx, Docx và PDF, bộ sưu tập các công cụ để chuyển đổi và lựa chọn phổ biến, v.v. .Thể loại: Làm thế nào để