View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
Nick Cranham Nick Cranham is offline
external usenet poster
 
Posts: 62
Default "Path/File Access Error" on Sheets.Copy

After searching Google, despite many post started about this error
occurring, I could not find any explanation or solution, so I'll try again.
This runs fine sometimes, but can then error for some unknown reason. A
restart of Excel, log off/log on, Windows can make a difference, but not
always.
Certainly only 1 instance of Excel running.
File name or path may have Chinese in it, but I don't think that's the
cause.

--------- Code -----------------------
Dim WBSpecs As Workbook

On Error GoTo cmdGetWS_Click_Error

Response = Excel.Application.GetOpenFileName("HK Spec Files (*.xls), *.xls",
, "Select the Spec Sheet to cost.")
If Response < False Then

Set WBSpecs = Workbooks.Open(Response)
With WBSpecs
.Sheets(1).Copy Befo=ThisWorkbook.Sheets("Costings")
.Sheets(2).Copy Befo=ThisWorkbook.Sheets("Costings")
.Close False
End With

Set WBSpecs = Nothing
--------- Code -----------------------

It bombs on ".Sheets(1).Copy Before..." with the error msg "Path/File Access
Error" '.\VBxx.tmp'".
Watching the folder containing the open workbook, the file VBxx.tmp is only
created after the error box appears.
Error handler on, so how is this error generating it's own unhandled error ?

Any help greatly appreciated.

NickHK