Cách đọc và ghi file text với code VBA Excel

Bạn đang làm nghiệp vụ đọc 1 nội dung của file text (còn gọi là .txt) trong VBA Excel, cần code vba để xử lý vấn đề này.

Trong bài viết này tôi mình trình bày 2 vấn đề chính:

1. Các cách code vba để nạp file text còn gọi là file txt vào excel

2. Ứng dụng thực tế code vba nạp file text vào vba excel

***

1. Các cách code nạp file text vào vba excel
 * Cách 1:

duongdanfile = "D:\data.txt"
   Dim vitriFile_FREE As Integer, noidungFile As String
   vitriFile_FREE = FreeFile 'bien FreeFile tra ve gia tri gi ?
   Open duongdanfile For Input As vitriFile_FREE
   noidungFile = Input(LOF(vitriFile_FREE), vitriFile_FREE)
   Close vitriFile_FREE
   
   Range("A1") = noidungFile