そのBASICのルーツに忠実に、VBAを使用すると、シーケンシャルファイルでファイル入力を行うことができます。これは、シーケンシャルテキストファイルを開いて読み取り、ファイルから文字列変数に情報をロードできることを意味します。手順は簡単です。ファイルを開き、入力を取得してから、ファイルを閉じるだけです。次のコードは、シーケンシャルファイルから読み取る一般的な例です。

Dim Raw As String Dim NumValues As Integer, J As Integer Dim UserVals() As String

Open "MyFile.Dat" For Input As #1 Line Input #1, Raw NumValues = Val(Raw)

ReDim UserVals(NumValues)



For J = 1 to NumValues     Line Input #1, UserVals(J)

Next J Close #1

この例では、テキストファイル（MyFile.Dat）から読み取られる最初の行に、ファイルから読み込まれるアイテムの数を示す値が含まれていると想定されていることに注意してください。

注：

このページ（または_ExcelTips_サイトの他のページ）で説明されているマクロの使用方法を知りたい場合は、役立つ情報を含む特別なページを用意しました。

link：/ excelribbon-ExcelTipsMacros [ここをクリックして、新しいブラウザタブでその特別なページを開きます]。

_ExcelTips_は、費用効果の高いMicrosoftExcelトレーニングのソースです。

このヒント（11115）は、Microsoft Excel 2007、2010、2013、2016、2019、およびOffice 365のExcelに適用されます。Excelの古いメニューインターフェイス用のこのヒントのバージョンは、次の場所にあります。

link：/ excel-Getting_Input_from_a_Text_File [テキストファイルからの入力の取得]。