Đôi khi các bộ lọc xuất được Excel sử dụng có thể tạo ra kết quả không mong muốn trong tệp đã xuất. Ví dụ: khi bạn xuất sang tệp văn bản được phân cách bằng tab, một số bộ lọc Excel đặt dấu ngoặc kép xung quanh văn bản trong một ô. Ví dụ: giả sử rằng một ô cụ thể chứa văn bản sau:


Tuy nhiên, đây là cách xuất văn bản trong ô bằng Excel:


Lưu ý rằng Excel thêm dấu ngoặc kép bổ sung, trước tiên xung quanh toàn bộ nội dung ô, sau đó là một tập hợp bổ sung xung quanh bất kỳ văn bản “được trích dẫn” nào trước đó trong ô.

Một giải pháp để xử lý vấn đề là chỉ cần tải tệp văn bản được tạo bởi Excel vào một chương trình khác, chẳng hạn như Word và sử dụng tính năng Tìm và Thay thế để loại bỏ các dấu ngoặc kép không mong muốn. Tuy nhiên, giải pháp tốt hơn là tạo macro của riêng bạn để tạo tệp văn bản đầu ra.

Hãy xem xét macro sau:

Sub Export()

Dim r As Range, c As Range     Dim sTemp As String

Open "c:\MyOutput.txt" For Output As #1     For Each r In Selection.Rows         sTemp = ""

For Each c In r.Cells            sTemp = sTemp & c.Text & Chr(9)

Next c

'Get rid of trailing tabs         While Right(sTemp, 1) = Chr(9)

sTemp = Left(sTemp, Len(sTemp) - 1)

Wend         Print #1, sTemp     Next r     Close #1 End Sub

Tất cả những gì bạn cần làm là chọn các ô bạn muốn xuất, sau đó chạy macro. Các ô trong vùng chọn được trích xuất từ ​​trang tính và được đặt trong tệp c: MyOutput.txt. (Tên tệp này có thể được thay đổi trong macro thành bất cứ điều gì bạn cần.)

_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 trang ExcelTips), tôi đã chuẩn bị một trang đặc biệt bao gồm thông tin hữu ích.

ExcelTips là nguồn của bạn để đào tạo Microsoft Excel hiệu quả về chi phí.

Mẹo này (8321) áp dụng cho Microsoft Excel 2007, 2010, 2013, 2016, 2019 và Excel trong Office 365. Bạn có thể tìm phiên bản của mẹo này cho giao diện menu cũ hơn của Excel tại đây: