Forum Discussion
Help debbuging - I have checked the path, files names, etc. any help is appreciated.
Private Sub Workbook_Activate() End Sub Private Sub Workbook_BeforeClose(Cancel As Boolean) Workbooks("DONT DELETE.xls").Close SaveChanges:=False Kill "G:\Training Unit\Cadet Training\Unit Folder...
ActiveWorkbook.SaveAs "G:\Training Unit\Cadet Training\Unit Folder\Instructors\Class Material\Departments\Testing\DONT DELETE.xls"
Try replacing the lines
Workbooks.Add
ActiveWorkbook.SaveAs "G:\Training Unit\Cadet Training\Unit Folder\Instructors\Class Material\Departments\Testing\DONT DELETE.xls"
Workbooks.Open Filename:="G:\Training Unit\Cadet Training\Unit Folder\Instructors\Class Material\Departments\Testing\DONT DELETE.xls"
with
Workbooks.Add.SaveAs FileName:="G:\Training Unit\Cadet Training\Unit Folder\Instructors\Class Material\Departments\Testing\DONT DELETE.xls", FileFormat:=xlExcel8
- I got past that error message but now it is throwing other ones.
-the file format and extension dont match.
- cound not find.......(Path could not be found)On the line that I suggested?
- Run-time error '1001';
Microsoft Excel cannot access the file'G/traiing Unit\........
-The file name or path does not exist
-The fie is being used by another program