VBA EOF Function

EOF Description

Returns the value indicating if the end of a file has been reached (Boolean).

EOF Syntax

In the VBA Editor, you can type  “EOF(” to see the syntax for the EOF Function:

The EOF function contains an argument:

FileNumber: Any valid file number.

Examples of Excel VBA EOF Function

To test the EOF function, create a text file “test.txt” on the D drive.(D:\test.txt) Assume that the content of the file is as following.

abc
1 2 3
xy z

Please run the following code.

Sub Input_Fx_Example()
    Dim strContent As String
    Dim MyChar
    Open "D:\test.txt" For Input As #1    ' Open file.
    Do While Not EOF(1)    ' Loop until end of file.
        MyChar = Input(1, #1)    ' Get one character.
        strContent = strContent & MyChar '
    Loop
    MsgBox strContent
    Close #1    ' Close file.
End Sub

Then, the result will be as following.

Here, used EOF function to determine that  the end of a file has been reached.