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 một nửa qua 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 giữ nguyên con trỏ tệp bên trong nhưng đặt iCurPos thành giá trị đại diện cho số 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 (2475) áp dụng cho Microsoft Excel 97, 2000, 2002 và 2003. Bạn có thể tìm thấy phiên bản của mẹo này cho giao diện ribbon của Excel (Excel 2007 trở lên) tại đây: