Excel VBA [備忘録]FreeFile関数について

はじめに

FreeFile関数についての備忘録です。

プロシジャーの説明

サンプル１　ExcelファイルやCSVファイルを開く

ExcelファイルやCSVファイルを操作する際には、Workbooks.OpenメソッドやOpenステートメントを使用。ファイル番号は必要ありません。

' Excelファイルを開く例
Dim wb As Workbook
Set wb = Workbooks.Open("C:\path\to\your\file.xlsx")

' CSVファイルを開く例
Dim csvWs As Worksheet
Set csvWs = Workbooks.Open("C:\path\to\your\file.csv").Sheets(1)

サンプル２　テキストファイルを操作する

VBAでは、FreeFile関数はテキストファイルやバイナリファイルを操作する際に使用

Dim fileNum As Integer
fileNum = FreeFile
Open "C:\path\to\your\file.txt" For Output As #fileNum
Print #fileNum, "Hello, World!"
Close #fileNum

#fileNumについて

#fileNumと書くことで、VBAに対して「このファイル番号のファイルを操作する」ということを明示しています。「#」はファイル番号であることを明示するためのプレフィックスであり、他の変数や数値と区別するために使われます。Print #fileNum, "Hello, World!"というステートメントは、指定されたファイル番号を持つファイルに対して文字列を書き込むことを意味します。