Excel VBAのLoc関数について

Excel VBAのLoc関数は、Open文でオープンされたファイルの現在の読み取り/書き込み位置をバイト単位で返す関数です。これにより、ファイル内の特定の部分へ直接アクセスすることが可能になります。

Loc関数の構文
Loc関数の使用例

Loc関数の構文

Loc関数の基本的な構文は以下の通りです:

Loc(filenumber)

ここでのパラメータの詳細は以下の通りです:

filenumber: Open文でオープンされたファイルを指定するためのファイル番号です。この番号はOpen文でオープンする際に指定したものでなければなりません。

Loc関数の使用例

以下にLoc関数の基本的な使用例を示します。この例では、テキストファイルからデータを読み込む際にLoc関数を使用して現在の読み取り位置を表示します。

Sub LocExample()
    Dim MyFile As String
    Dim textline As String
    Dim FileNumber As Integer
    
    MyFile = "C:\test.txt"  
    FileNumber = FreeFile()

    Open MyFile For Input As FileNumber
        Line Input #FileNumber, textline
        MsgBox "現在の読み取り位置: " & Loc(FileNumber)
    Close FileNumber
End Sub

このサブルーチンでは、まず指定したテキストファイルを開きます。次に、1行読み取り、その後にLoc関数を使用して現在の読み取り位置を表示します。最後に、ファイルを閉じます。

このように、Loc関数はファイルの読み取り/書き込み位置を取得するための便利な関数です。大きなファイルを取り扱う際や、特定の位置からデータを読み取りたい場合に使用できます。