HoangHust
09-14-2020, 08:35 PM
Hi everyone
I copied a template sheet excel from PC1 to PC2 .
( PC 1 use Windows 7 and excel 2007 ) , ( PC2 use Windows 10 and excel 2016 ) .
But I can't run it on PC2 , it was show a message error
"Run-time error '1004' Sorry, we couldn't find E:\Workzone\A566-z349b\zoneinfo.csv . Is it possible it was moved, renamed or deleted? "
It always appear error, but if i create a folder name A566-z349b, it is okay .
My file type is .xlt file ,but I can't upload it , so I changed it to .xlsm file
I attached file template , please check it and let me know why
Public Sub ReadCsv()
Dim SaveSheet As String, SaveWindow As String
SaveSheet = ActiveSheet.Name
Worksheets("TempSheet_I").Activate
Range("A1").CurrentRegion.Select
Selection.ClearContents
Cells(1, 1).Select
Workbooks.Open Filename:=pCsvPath (This line appear bug, pCsvPath = E:\Workzone\A566-z349b\zoneinfo.csv )
Range("A1").CurrentRegion.Select
Selection.Copy
ActiveWindow.WindowState = xlMinimized
I copied a template sheet excel from PC1 to PC2 .
( PC 1 use Windows 7 and excel 2007 ) , ( PC2 use Windows 10 and excel 2016 ) .
But I can't run it on PC2 , it was show a message error
"Run-time error '1004' Sorry, we couldn't find E:\Workzone\A566-z349b\zoneinfo.csv . Is it possible it was moved, renamed or deleted? "
It always appear error, but if i create a folder name A566-z349b, it is okay .
My file type is .xlt file ,but I can't upload it , so I changed it to .xlsm file
I attached file template , please check it and let me know why
Public Sub ReadCsv()
Dim SaveSheet As String, SaveWindow As String
SaveSheet = ActiveSheet.Name
Worksheets("TempSheet_I").Activate
Range("A1").CurrentRegion.Select
Selection.ClearContents
Cells(1, 1).Select
Workbooks.Open Filename:=pCsvPath (This line appear bug, pCsvPath = E:\Workzone\A566-z349b\zoneinfo.csv )
Range("A1").CurrentRegion.Select
Selection.Copy
ActiveWindow.WindowState = xlMinimized