VBA で指定されたファイルの内容を取得するには
VBA では `Open` ステートメントを使用してファイルをオープンし、`Input` 関数を使用してファイルの内容を読み込むことができます。以下に示すサンプル コードは、指定されたファイルの内容を読み込む方法を示しています。
Sub ReadFileContent()
Dim fileNumber As Integer
Dim content As String
Dim filePath As String
‘ 设置文件路径
filePath = “C:\path\to\file.txt”
‘ 打开文件
fileNumber = FreeFile
Open filePath For Input As fileNumber
‘ 读取文件内容
content = Input$(LOF(fileNumber), fileNumber)
‘ 关闭文件
Close fileNumber
‘ 打印文件内容
Debug.Print content End Sub
上記のコードの例では、まずOpen文で指定されたパスにあるファイルを開き、FreeFile関数で利用可能なファイル番号を取得します。次に、Input関数でファイルの全内容を読み取って文字列変数のcontentに格納します。最後に、Close文でファイルを閉じ、Debug.Print文でファイルの内容を出力します。コード内のfilePath変数は、読み取りたいファイルのパスに変更できます。