作者ppppppppp (我只是個可有可無的路人)
看板Office
標題[算表] 請問在excel vba寫另存新檔成.xls
時間Thu Jan 4 00:10:53 2018
軟體:Excel
版本:2010
想請問 我寫了一個excel vba檔案(*.xlsm)進行一些資料處理的動作
之後想把其中一個工作表另存為Excel 97-2003活頁簿(*.xls)的格式
Workbooks.Add
ActiveWorkbook.SaveAs ThisWorkbook.Path & "\" & "ABC.xls"
n = Workbooks(1).Worksheets("資處用-提單").Range("B65536").End(xlUp).Row
Workbooks(1).Worksheets("資處用-提單").Range("A1:T" & n + 1).Copy
ActiveWorkbook.Worksheets(1).Range("A1").PasteSpecial Paste:=xlPasteAll
ActiveWorkbook.Save
ActiveWorkbook.Close
檔案是可以存
但是那個ABC.xls打開來時
他會說格式不符 無法使用
請問怎樣把其中一個工作表另存成.xls的格式
謝謝
--
╔════════════════════════════════╗
║ ███ ███ ███ ███ ███ ███ ███ ███ ███ ║
║ █ █ █ █ █ █ █ █ █ㄑ█ █ㄑ█ █ █ █ █ █ █ ║
║ ███ ███ ███ ███ ███ ███ ███ ███ ███ ║
║ █ █ █ █ █ █ █ █ █ ║
╚═══════════════════════你看得清有幾個P嗎?╝
--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 182.233.82.39
※ 文章網址: https://webptt.com/m.aspx?n=bbs/Office/M.1514995857.A.CD2.html
1F:→ ppppppppp: 啊我會了 檔案名稱後面加上檔案格式的語法 01/04 00:25
2F:→ ppppppppp: , FileFormat:=56 01/04 00:25
3F:推 c90195h: 推一個 01/04 07:35
4F:推 linnderna: 沒人理你 01/04 09:36
5F:推 japing: 不錯喔 學到一招 01/04 18:11
6F:→ ppppppppp: 0//////0 01/05 00:20