How to use the FileSystemObject in VBA

Question

So I'm quite new to VB and I'm just trying to create something that will open up a .txt file then read the first line and output it. I've put my code below but when I run it I get the error

Object variable or with block variable not set

because of the line

objTXT=objFSO.OpenTextFile("C:\...",ForReading)

Any help, I feel like I'm missing something quite basic.

Private Sub Text_Reader()

    Dim objFSO As FileSystemObject
    Dim objTXT As TextStream
    Dim str$

    Set objFSO = New FileSystemObject

    objTXT = objFSO.OpenTextFile("C:\...", ForReading)
    str = objTXT.ReadLine
    MsgBox (str)

End Sub

You're just missing a Set keyword in front of objTXT = ... MSDN Reference to OpenTextFile and a bit more here on SO — user2140173
– user2140173, Commented Jul 22, 2015 at 10:22

R.Katnaan · Accepted Answer · 2015-07-22 10:20:08Z

1

The problem is not use Set for opening. Try as follow:

Set objTXT = objFSO.OpenTextFile("C:\...", ForReading)

answered Jul 22, 2015 at 10:20

R.Katnaan

2,5364 gold badges28 silver badges38 bronze badges

Sign up to request clarification or add additional context in comments.

Comments

mielk · Accepted Answer · 2015-07-22 10:17:42Z

1

You don't need FileSystemObject to read textfile. You can do it like that (without any external libraries):

Public Sub readTextFile(filepath As String)
    Dim intFile As Integer
    Dim text As String
    '------------------------------------------------------------------------------------------------------

    intFile = VBA.FreeFile()

    Open filepath For Input As #intFile
    Line Input #intFile, text
    Close intFile

    Call MsgBox(text)

End Sub

answered Jul 22, 2015 at 10:17

mielk

3,94014 silver badges20 bronze badges

1 Comment

user2140173 Over a year ago

That's an alternative but doesn't really answer the question asked.

Collectives™ on Stack Overflow

How to use the FileSystemObject in VBA

2 Answers 2

Comments

1 Comment

Your Answer

Linked

Hot Network Questions

Collectives™ on Stack Overflow

2 Answers 2

Comments

1 Comment

Your Answer

Sign up or log in

Post as a guest

Linked

Related