View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
DMoney DMoney is offline
external usenet poster
 
Posts: 130
Default Open file ready only

Workbooks.Open "xxxxxxx.xls", ReadOnly:=True

replace the xxxxx with your filename.

dmoney

"Steven" wrote:

I have code that on the Auto_Open it will run test to see if the file is read
only and if not then will make it ready only. The issue is that when you go
to ready only it will ask if you want to save the file. I do not because I
want the file only ready only from the beginning. What I did is make a
second file and on the Before_Save I test the name of the file and if it is
the name of the final file I am using I Cancel the Save. So I complete my
setup file and then I go to windows and make a copy and name it my final
file. So basically the user enters the file....in the Auto_Open it sets
DisplayAlerts to False ... then changes file to ready only ... the file wants
to save and since it is now the name of the file that I am testing and
Cancelling in the Before_Save it will not save and will switch to ReadOnly
with out saving and without displaying alerts. I also have cancelled out the
SaveAs..

Is this the best way to handle this or is there a way to tell a file to open
directly ReadOnly.

Note: I do not want to do Recommend Read Only. I want the file to open
and be forced to Read Only.

Thank you,

Steven