Re: Cannot write to a file using VBA

From: APR (I_Dont_Want_Spam_at_Spam.com)
Date: 09/23/05 

Date: Fri, 23 Sep 2005 23:53:11 +1000

Do you have to create the file before you can open it.
Maybe you need a conditional statement along the lines of if the file exists
then open it otherwise create it first.

"DavidTM" <DavidTM@discussions.microsoft.com> wrote in message
news:6985FD39-422A-44FC-ACAF-47E602E97087@microsoft.com...
> Hi
>
> Firstly, I must admit that I have posted this question to the
> excel.programming group, but have not yet received a reply. I think the
> issue
> may be related to security so I am hoping for some help in this security
> group.
>
> I am trying to run some very simple code to write to a file on my host PC
> using an Excel VBA macro:
>
> Sub TestFileOpening()
> Dim FileNumber As Integer
> FileNumber = FreeFile()
> Open "C:\TEST.TXT" For Output As #FileNumber
> Write #FileNumber, "This is a sample."
> Close #FileNumber
> End Sub
>
> The 'write' statement fails with 'Run-time error '54' Bad file mode'. This
> means the file was not opened for output.
>
> This code runs fine on a colleague's machine. I have tried setting the
> Excel
> security level to medium or low but still get the error. I am almost
> certain
> the code is correct (as it complies with Microsoft examples) so I suspect
> a
> security issue but I don't know where else to look.
>
> I am running Excel 2003 SP1 on Windows XP Prof SP2.
>
> Is there any Windows security setting that may be preventing the file
> write
> operation?
>
> David
>

Relevant Pages