Can't open file in Excel VBA, Run-time error '52'

Question

So I've got this code

Dim fpath As String
fpath = "D:\stats.csv"
Open fpath For Append As #fw

However when I am trying to run it I am getting a run-time error '52': Bad file name or number.

I have no idea what I am doing wrong, maybe it's a Office 2016/Windows 10 glitch that I am not aware of.

Thanks in advance for your help

A.S.H · Accepted Answer · 2017-07-29 15:07:29Z

2

You need fw to be a valid file identifier number. To do so, get an identifier from the function FreeFile:

Dim fpath As String, fw As Long
fw = FreeFile                   ' <--------- get a valid file identifier
fpath = "D:\stats.csv"
Open fpath For Append As #fw

answered Jul 29, 2017 at 15:07

A.S.H

29.4k6 gold badges25 silver badges50 bronze badges

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

Collectives™ on Stack Overflow

Can't open file in Excel VBA, Run-time error '52'

1 Answer 1

Comments

Your Answer

Hot Network Questions

Collectives™ on Stack Overflow

1 Answer 1

Comments

Your Answer

Sign up or log in

Post as a guest

Related