Một số mẹo khác trong các vấn đề khác của ExcelTips thảo luận về việc mở, đọc, ghi, nối và đóng tệp văn bản từ bên trong một macro.

Một lệnh khác được liên kết với các tệp văn bản tuần tự là lệnh Seek. Nếu được sử dụng trên tệp đang mở, Tìm kiếm định vị con trỏ tệp nội bộ tại một số ký tự cụ thể trong tệp. Đoạn mã sau đây là một ví dụ về cách nó được sử dụng:

Open "DOSTEXT.DAT" for Input as #1 iFileLen = LOF(1)

Seek 1, iFileLen / 2

Các dòng chương trình này sử dụng hàm LOF để xác định độ dài của tệp. Sau đó, dòng cuối cùng đặt con trỏ tệp bên trong nửa chừng tệp. Tất cả việc đọc hoặc ghi tệp tiếp theo sẽ diễn ra từ vị trí đó.

Bạn cũng có thể sử dụng Seek như một chức năng để xác định vị trí hiện tại của bạn trong một tệp văn bản. Đây là những gì mã này làm:

iCurPos = Seek(1)

Lệnh này để lại con trỏ tệp bên trong vị trí của nó nhưng đặt iCurPos thành một giá trị đại diện cho số lượng ký tự trong tệp mà con trỏ. Giá trị iCurPos là vị trí mà tại đó tất cả quá trình đọc và ghi tệp tiếp theo sẽ diễn ra.

_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 (9367) áp dụng cho Microsoft Excel 2007, 2010, 2013, 2016, 2019 và Excel 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 Excel tại đây: