
Excel VBAのLine Input、ファイルから1行ずつテキストを読み込むために使用します。テキストファイルの内容をプログラムに読み込む際に使います。具体的な使い方や、注意点やサンプルコードを紹介します。
📌 「これ、自動化できたらラクなのに…」と思ったこと、ありませんか?
実はその作業、Excelマクロで簡単に自動化できるかもしれません。
「でもマクロって難しそう…」という方のために、完全初心者向けの入門記事をご用意しました!
👇実務で“そのまま使える”テンプレ付きで、コピペするだけ!
初心者向けエクセルマクロの作り方を解説|コピペOK実務テンプレ付き
Excel VBA Line Inputの利用
以下のようなシーンで利用されます。
・テキストファイルからデータを読み込んで処理する場合に使用します。また、CSVファイルなどの形式のデータを読み込む際によく利用します。
Excel VBA Line Inputの使い方とポイント
・ファイル番号を使用してファイルを開きます。
・ファイルから1行ずつテキストを読み込みます。
・ファイルの終端に達すると、End Of File (EOF) マークが設定
・ファイルの各行は、ファイルの改行文字(通常は vbCrLf)で区切られている。
・テキストファイルが大きい場合やフォーマットが複雑な場合は、他の方法を検討する。
・ファイルが存在しない場合やアクセスできない場合、実行時エラーが発生します。
Excel VBA Line Inputのサンプルコード
自分の実力を客観的にチェックしたい…。そんな方のために、自分に合ったスタート地点がわかる無料のExcelVBAベーシック選択問題集をご用意しました。
Option Explicit
Sub ReadTextFile()
Dim fileNum As Integer
Dim textLine As String
' ファイルを開く
fileNum = FreeFile
Open "C:\Users\User\Desktop\DataCsv\テキスト.txt" For Input As fileNum
' ファイルから1行ずつ読み込む
Do Until EOF(fileNum)
Line Input #fileNum, textLine
Debug.Print textLine ' 1行ずつデバッグウィンドウに出力
Loop
' ファイルを閉じる
Close fileNum
End Sub
サンプルコードは、"C:\Users\User\Desktop\DataCsv\テキスト.txt" というファイルから1行ずつテキストを読み込み、デバッグウィンドウに出力します。
「Excel VBAで自動化するコードのベースが習得できる解説書」
Excel VBAエキスパートベーシックとスタンダード、どちらを選べばいいか判断が難しい…。そんな方のために、自分に合ったスタート地点がわかる無料のExcelVBAベーシック選択問題集を用意しました。