[已解决]怎么创建工作簿？

sdfd12 · 发表于 2013-10-17 22:53

本帖最后由 sdfd12 于 2013-10-23 19:14 编辑

怎么创建工作簿？

最佳答案

danio112

2013-10-18 07:01

sdfd12 发表于 2013-10-17 23:21
复制这个工作簿在桌面上，最好能在代码里设置改文件名？

Sub 另存为()
ThisWorkbook.SaveAs ThisWorkbook.Path & "\名字.xls"
End Sub

把名字替换为你想要的名字。

danio112 · 发表于 2013-10-17 23:12

在桌面上了还复制到桌面上？

sdfd12 · 发表于 2013-10-17 23:21

danio112 发表于 2013-10-17 23:12
在桌面上了还复制到桌面上？

复制这个工作簿在桌面上，最好能在代码里设置改文件名？

danio112 · 发表于 2013-10-18 07:01

sdfd12 发表于 2013-10-17 23:21
复制这个工作簿在桌面上，最好能在代码里设置改文件名？

Sub 另存为()
ThisWorkbook.SaveAs ThisWorkbook.Path & "\名字.xls"
End Sub

把名字替换为你想要的名字。

sdfd12 · 发表于 2013-10-18 20:45

本帖最后由 sdfd12 于 2013-10-23 19:14 编辑

danio112 发表于 2013-10-18 07:01
Sub 另存为()
ThisWorkbook.SaveAs ThisWorkbook.Path & "\名字.xls"
End Sub

谢谢！！！

sdfd12 · 发表于 2013-10-20 09:25

帮个忙？

sdfd12 · 发表于 2013-10-22 19:37

能不能按5楼要求写下代码？

		自动登录	找回密码
密码			注册