隨手記錄

【EXCEL】- VBA - EXCEL讀取文字檔(txt)

⬛ 問題：EXCEL - VBA - EXCEL如何讀取文字檔(txt)？

⬛ 回答：

以下將EXCEL VBA的範例先記錄下來，日後可以參考。

Sub READ_TXT()
    
    Dim ReadPath As String
    
    ReadPath = ActiveWorkbook.Path & "\" & "list.txt"

    Open ReadPath For Input As #1
    
    Range("A1").Select
    
    
    Do Until EOF(1) '從#1檔案讀取一行
        
        Line Input #1, 轉存區
        
        ActiveCell.Value = 轉存區
        
        ActiveCell.Offset(1, 0).Select
                     
        
    Loop
                   
    
    Close #1


End Sub

延伸閱讀

■ EXCEL VBA 相關文章🔍