大神求助实现点击按钮自动导出当前工作表，并以名称加年月日的形式自动命名

yuangsun · 发表于 2018-10-11 10:54

如图所示，我想实现点击导出，能自动将该工作表保存的新建工作簿中，并能按文本框中输入的名称+当前年月日的文件名保存。代码如何写啊大神！

yuangsun · 发表于 2018-10-11 10:56

还有自导出的工作表中时候能自动把上面的文本框、命令按钮控件去掉吗？

蓝桥玄霜 · 发表于 2018-10-11 10:57

欢迎新会员！

建议上传Excel表格附件来说明问题。
没有表格附件的求助帖很少能获得满意的回复。
求助帖子不要只上传图片。

Mapleaf12138 · 发表于 2018-10-11 11:02

新建工作表用 workbooks.add

Mapleaf12138 · 发表于 2018-10-11 11:03

命名用saveas

Mapleaf12138 · 发表于 2018-10-11 11:04

把现有表的内容复制到新表中，不要复制文本框之类的就可以了

yuangsun · 发表于 2018-10-11 14:04

这是我需要实现功能的工作簿，请大神帮忙吧

yuangsun · 发表于 2018-10-11 14:05

Mapleaf12138 发表于 2018-10-11 11:02
新建工作表用 workbooks.add

我把附件加上了，会的帮下吧

Mapleaf12138 · 发表于 2018-10-11 14:16

yuangsun 发表于 2018-10-11 14:05
我把附件加上了，会的帮下吧

不是已经说了
workbooks.add 新建表
copy数据到新表
Format(Date, "yyyy年m月d日")获取当前日期
saveas 命名新表并保存即可

yuangsun · 发表于 2018-10-11 14:34

Mapleaf12138 发表于 2018-10-11 14:16
不是已经说了
workbooks.add 新建表
copy数据到新表

哥们能给我详细点的代码吗？这样我还是不是很懂啊VBA零基础

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

[求助] 大神求助实现点击按钮自动导出当前工作表，并以名称加年月日的形式自动命名