作者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/cn.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