shellyjamiotm

恰克文翻譯(若是和其他不同軟體互動之問題 請記得一併填寫) 軟體:office excel 版本: 2007 新年快樂,大家好 最近在寫一個Excel 2007的VBA。其中的程式碼，開啟文字檔會出現錯誤訊息,如下列 「執行階段錯誤 '1004':找不到'list.txt '。請檢查檔名是否有拼錯，或是檔案位置是否正確。.................」 詳細錯誤訊息，請詳以下網址的圖示 http://ppt.cc/YdfM 有確認檔案存在位置及檔名都正確，並且有先用google找過解決的方法， 試過後，執行時一樣有相同的錯誤訊息。 請教各位達人高手 是否可以幫忙看看並解決，感謝! 補充：檔案的程式碼如下: Sub cmd() cmdstr1 = "cmd /c del D:\list.txt" retval = Shell(cmdstr1, 0) cmdstr = "cmd /c dir/b D:\JOB\dormantID_Review\VBA\*.xls > D:\list.txt" retval = Shell(cmdstr, 0) '開啟"檔案清單文字檔" Workbooks.OpenText Filename:="D:\list.txt" '計算文字檔有幾列 last_row = ActiveSheet.UsedRange.Rows.Count '將檔案名稱分別填入頁籤(Sheet2)每一列的第一欄 For i = 1 To last_row Sheet2.Cells(i, 1).Value = Cells(i, 1).Value Next i ActiveWorkbook.Close '關閉剛才開啟的檔案清單文字檔 Close #1 .........................................

來自: https://www.ptt.cc/bbs/Office/M.1391484776.A.E98.html有關翻譯的問題歡迎諮詢天成翻譯社