复制指定工作表到指定工作簿

LangQueS · 发表于 2007-6-7 10:15

求宏代码，谢谢！

复制当前“报表”工作表到“临时”工作簿，如果“临时”工作簿未打开，就创建新工作簿为“临时”。

yuanzhuping · 发表于 2007-6-7 22:08

如果“临时”工作簿未打开，就创建新工作簿为“临时”，还是就打开“临时”工作簿？

LangQueS · 发表于 2007-6-7 22:14

QUOTE:

以下是引用yuanzhuping在2007-6-7 22:08:02的发言：
如果“临时”工作簿未打开，就创建新工作簿为“临时”，还是就打开“临时”工作簿？

创建新工作簿。

yuanzhuping · 发表于 2007-6-7 23:23

rgrZo97h.rar (9.36 KB, 下载次数: 200)
是否这样的？

LangQueS · 发表于 2007-6-8 00:28

QUOTE:

以下是引用yuanzhuping在2007-6-7 23:23:02的发言：

是否这样的？

太好了，谢谢yuanzhuping兄！

不过好象代码有些故障，创建了新工作簿，但未将“报表”工作表复制过去。

另外“报表”工作表复制到“临时”工作簿时，可否同时重新指定表名称（例如“001”为新的表名称）？

谢谢！

[此贴子已经被作者于2007-6-8 0:39:24编辑过]

yuanzhuping · 发表于 2007-6-8 00:39

QUOTE:

“报表”工作表复制到“临时”工作簿时，可否同时重新指定表名称（例如“001”为新的表名称）？

是新工作簿中的表改名？是否这样的？

xCFdhKaO.rar (14.24 KB, 下载次数: 93)

LangQueS · 发表于 2007-6-8 00:42

是的，将“报表”工作表复制到“临时”工作簿中为001表。

似乎原代码未复制“报表”工作表到“临时”工作簿？

yuanzhuping · 发表于 2007-6-8 00:45

AZfKMdzf.rar (10.98 KB, 下载次数: 125)
写入数据的。

LangQueS · 发表于 2007-6-8 01:01

当我将001表改为002表或删除后，再按钮就不运行了？应该重新复制过去一个001表。

也就是说，当“临时”工作簿已经打开时，要复制“报表”工作表为“001”表添加到其中去。

[此贴子已经被作者于2007-6-8 1:06:43编辑过]

yuanzhuping · 发表于 2007-6-8 01:09

u6BuwMZX.rar (10.79 KB, 下载次数: 129)
这样？

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