I want to use a excel file with some read only data in it in many templates.
I was logically trying to copy the file from the server to PC whenever user
is connected to Intranet and then use it even if you are offline. It works
fine at my system (I do have an access to the server). But it did not work on
other users machine who did not have an access to the server. while connected
to the intranet ..when code is being executed to copy the file from source to
destination...in source area it gives an error "Path access error".

My understanding was that if i know the complete path (including the server
name etc), i could read/copy the file.

Is my assumption wrong. and if so what would be the logical way to overcome
this problem.
--
Ajit

Now it is not very clear what you mean by users 'not having access to
the server'.
Do you mean that the user can access the intranet over the internet, but
do not have direct access to the server through LAN?

If this is the case then the path entered as
'\\servername\foldername\subfoldername\filename' will not work for those
who are not connected to the server through LAN.

There is also no need to copy the file on to local PC. Just open the
file, and as long as it is open, even if the user disconnects from the
intranet the file will remain open on the PC.
You can use the URL of file to open the file.
e.g. "
Dim intraBook As Workbook
Set intraBook = Workbooks.Open
_("http://www.yourdomain.com/yourfile.xls") 'complete url
'If you must save then save it
intraBook.SaveAs "C:\localfoldername\filename.xls"

Sharad


*** Sent via Developersdex http://www.developersdex.com ***
Don't just participate in USENET...get rewarded for it!

Thanks for your reply sharad,
I was not sure if you could open a file from url. That solved my purpose
very well.

Sharad, I was just curious for one more thing. As we open the file from the
URL it shows the downloading bar ofr second. Is it possible to get rid of it
or customize it.

Thanks

"Sharad" wrote:


Now it is not very clear what you mean by users 'not having access to
the server'.
Do you mean that the user can access the intranet over the internet, but
do not have direct access to the server through LAN?

If this is the case then the path entered as
'\\servername\foldername\subfoldername\filename' will not work for those
who are not connected to the server through LAN.

There is also no need to copy the file on to local PC. Just open the
file, and as long as it is open, even if the user disconnects from the
intranet the file will remain open on the PC.
You can use the URL of file to open the file.
e.g. "
Dim intraBook As Workbook
Set intraBook = Workbooks.Open
_("http://www.yourdomain.com/yourfile.xls") 'complete url
'If you must save then save it
intraBook.SaveAs "C:\localfoldername\filename.xls"

Sharad


*** Sent via Developersdex http://www.developersdex.com ***
Don't just participate in USENET...get rewarded for it!

Sure!
Try this:
Application.DisplayAlerts = False
Workbooks.Open "your_URL_here"
Application.DisplayAlerts = True

Sharad

"Ajit" wrote in message
...
Thanks for your reply sharad,
I was not sure if you could open a file from url. That solved my purpose
very well.

Sharad, I was just curious for one more thing. As we open the file from
the
URL it shows the downloading bar ofr second. Is it possible to get rid of
it
or customize it.

Thanks

"Sharad" wrote:


Now it is not very clear what you mean by users 'not having access to
the server'.
Do you mean that the user can access the intranet over the internet, but
do not have direct access to the server through LAN?

If this is the case then the path entered as
'\\servername\foldername\subfoldername\filename' will not work for those
who are not connected to the server through LAN.

There is also no need to copy the file on to local PC. Just open the
file, and as long as it is open, even if the user disconnects from the
intranet the file will remain open on the PC.
You can use the URL of file to open the file.
e.g. "
Dim intraBook As Workbook
Set intraBook = Workbooks.Open
_("http://www.yourdomain.com/yourfile.xls") 'complete url
'If you must save then save it
intraBook.SaveAs "C:\localfoldername\filename.xls"

Sharad


*** Sent via Developersdex http://www.developersdex.com ***
Don't just participate in USENET...get rewarded for it!

That doesn't work. The downloading status still comes up.
I think DisplayAlert property is used any time a message requires a
response. Is my assumption correct.

Or may be i wasn't too clear in what i mean't
Actually whem i am opening the URL
Workbooks.Open"http://www.yourdomain.com/yourfile.xls"). It shows a
downloading box for a second.

Any Ideas!

Thanks,

"Sharad" wrote:


Now it is not very clear what you mean by users 'not having access to
the server'.
Do you mean that the user can access the intranet over the internet, but
do not have direct access to the server through LAN?

If this is the case then the path entered as
'\\servername\foldername\subfoldername\filename' will not work for those
who are not connected to the server through LAN.

There is also no need to copy the file on to local PC. Just open the
file, and as long as it is open, even if the user disconnects from the
intranet the file will remain open on the PC.
You can use the URL of file to open the file.
e.g. "
Dim intraBook As Workbook
Set intraBook = Workbooks.Open
_("http://www.yourdomain.com/yourfile.xls") 'complete url
'If you must save then save it
intraBook.SaveAs "C:\localfoldername\filename.xls"

Sharad


*** Sent via Developersdex http://www.developersdex.com ***
Don't just participate in USENET...get rewarded for it!

I mean a progress bar

"Ajit" wrote:

That doesn't work. The downloading status still comes up.
I think DisplayAlert property is used any time a message requires a
response. Is my assumption correct.

Or may be i wasn't too clear in what i mean't
Actually whem i am opening the URL
Workbooks.Open"http://www.yourdomain.com/yourfile.xls"). It shows a
downloading box for a second.

Any Ideas!

Thanks,

"Sharad" wrote:


Now it is not very clear what you mean by users 'not having access to
the server'.
Do you mean that the user can access the intranet over the internet, but
do not have direct access to the server through LAN?

If this is the case then the path entered as
'\\servername\foldername\subfoldername\filename' will not work for those
who are not connected to the server through LAN.

There is also no need to copy the file on to local PC. Just open the
file, and as long as it is open, even if the user disconnects from the
intranet the file will remain open on the PC.
You can use the URL of file to open the file.
e.g. "
Dim intraBook As Workbook
Set intraBook = Workbooks.Open
_("http://www.yourdomain.com/yourfile.xls") 'complete url
'If you must save then save it
intraBook.SaveAs "C:\localfoldername\filename.xls"

Sharad


*** Sent via Developersdex http://www.developersdex.com ***
Don't just participate in USENET...get rewarded for it!

I had understood your question correct.
I have excel 2003. With DisplayAlerts set to False
the Download box does not pop up.
Sharad
"Ajit" wrote in message
...
I mean a progress bar

"Ajit" wrote:

That doesn't work. The downloading status still comes up.
I think DisplayAlert property is used any time a message requires a
response. Is my assumption correct.

Or may be i wasn't too clear in what i mean't
Actually whem i am opening the URL
Workbooks.Open"http://www.yourdomain.com/yourfile.xls"). It shows a
downloading box for a second.

Any Ideas!

Thanks,

"Sharad" wrote:


Now it is not very clear what you mean by users 'not having access to
the server'.
Do you mean that the user can access the intranet over the internet,
but
do not have direct access to the server through LAN?

If this is the case then the path entered as
'\\servername\foldername\subfoldername\filename' will not work for
those
who are not connected to the server through LAN.

There is also no need to copy the file on to local PC. Just open the
file, and as long as it is open, even if the user disconnects from the
intranet the file will remain open on the PC.
You can use the URL of file to open the file.
e.g. "
Dim intraBook As Workbook
Set intraBook = Workbooks.Open
_("http://www.yourdomain.com/yourfile.xls") 'complete url
'If you must save then save it
intraBook.SaveAs "C:\localfoldername\filename.xls"

Sharad


*** Sent via Developersdex http://www.developersdex.com ***
Don't just participate in USENET...get rewarded for it!