[VB6 ] 開啟excel的檔案後進行編輯，並另存新檔的問題
各位版上的高手
想請問一下
我今天想用VB開啟xls檔案(例如FileA)，然後新增或刪除sheet後
另存成新的xls檔(FileB)，請問有可行的方法嗎?
因為目前寫的方式(如下)，會出現系統警告音，也不會把sheet刪除
Set xlApp = CreateObject("Excel.Application")
xlApp.Workbooks."C:\FileA.xls"
xlApp.Sheets("Sheet1").Delete
xlApp.ActiveWorkbook.SaveAs "C:\FileB.xls"
xlApp.Workbooks.Close
xlApp.Quit
Set xlApp = Nothing
請問有比較好的作法嗎@@? 感謝
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 123.195.202.61