阅： 3297 | 回： 6
发表于2015/9/5 10:10:55
楼主
等级:初学者
-
积分:1
-
财富值:1.0
-
身份:普通用户
最近遇到一个问题 我的一个工作薄内有多张工作表，我需要选取部分工作表另存为一个新的工作薄，如果是连续的我按shift从 第几个到第几个操作一下就完了 可惜现在是不连续的 我得按着crtl 一个个的选 数量比较多有时候容易出错。想到用VBA来编个小程序，可惜功力不够，请各位大大帮忙解决一下呗
见附件
悬赏：1 财富值
下载Excel文件
下载Excel文件
我的个性签名
等级:学者
等级:初学者-
积分:1
-
财富值:1
-
身份:普通用户
回复：5楼
格子大神 再增加3个功能
1另存为的时候 删除新建工作薄内的按钮控件及VBA代码。
2另存为的时候另存的过程中，每个新建表格的B2：BB5 公式变成数据。
3另存为的时候另存的过程中，提示输出保存文件名。文件名可以自己输入（保留默认文件名）。
附件: 下载
我的个性签名