シーケンシャルファイルを読み込む : Excel(エクセル)

Excel VBAでシーケンシャルファイルを読み込み、セルに書き込みます。

ファイルを開く構文 : Open ファイル名 For モード #ファイル番号
シーケンシャルファイルを読み込むモード : Input - 入力モード

ファイルを読み込む構文 : Line Input #ファイル番号,変数
一行分のデータを読み込みます。

ファイルを閉じる構文 : Close #ファイル番号

Excel VBA Tips関連記事
テキストファイルへ書き込み
テキストファイルの読込み
シーケンシャルファイルに書き込む

Excel Tipsメニューに戻る

スポンサーリンク





Excel実行画面

エクセル ゴミ収集カレンダーです。
日付も種類も空白です。ここにシーケンシャルファイルの読み込み結果を書き込みます。
未記入のゴミ収集カレンダー

読み込むシーケンシャルファイルです。
日付ともえるごみ等の分別する種類が記録されています。改行のみなのは種類に何も登録されていないことになります。
メモ帳の画面

シーケンシャルファイルを読み込み、エクセルのセルに入力した結果です。
エクセル ゴミ収集カレンダー

スポンサーリンク





Excel VBA実行コード

Option Explicit

Option Explicit

Option Explicit

'読み込みボタン
Private Sub CommandButton2_Click()
    Dim i As Long
    Dim s As String
    
    Open "C:\test\test.txt" For Input As #1
    For i = 7 To 21
        Line Input #1, s
        Cells(i, 2) = s
        Line Input #1, s
        Cells(i, 3) = s
    Next
    Close #1
    MsgBox "読み込みしました"
End Sub

スポンサーリンク






Excel Tipsメニューに戻る

■■■
このサイトの内容を利用して発生した、いかなる問題にも一切責任は負いませんのでご了承下さい
■■■
当ホームページに掲載されているあらゆる内容の無許可転載・転用を禁止します


Copyright (c) Excel-Excel ! All rights reserved