设为首页收藏本站Access中国

Office中国论坛/Access中国论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

返回列表 发新帖
查看: 1918|回复: 2
打印 上一主题 下一主题

[VBA编程/宏] 求各位帮忙写一个宏,万分感谢!!!

[复制链接]
跳转到指定楼层
1#
发表于 2009-4-17 11:07:49 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
要求在我的工作簿中Sheet1表中写一个宏(做一个按钮)
1.在指定路径创建一个文件夹,以表Sheet1的A1重命名(能判断是否重名,如果有重名文件夹则提示是否覆盖)
2.在文件夹中以表Sheet1的A1重命名创建工作簿,,复制Sheet2、Sheet3、Sheet4、Sheet5到该工作簿中
3.保存后去除更新链接(不更新Sheet2、Sheet3、Sheet4、Sheet5)
4.打印Sheet2、Sheet3、Sheet4、Sheet5其中Sheet2、Sheet3打印2份,Sheet4、Sheet5打印1份
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享分享 分享淘帖 订阅订阅
2#
发表于 2009-4-17 13:09:59 | 只看该作者

要求在我的工作簿中Sheet1表中写一个宏(做一个按钮)
1.在指定路径创建一个文件夹,以表Sheet1的A1重命名(能判断是否重名,如果有重名文件夹则提示是否覆盖)
        表Sheet1的A1 sheet1.range("A1")
        EXCEL 自带帮助中搜索 MkDir 语句

2.在文件夹中以表Sheet1的A1重命名创建工作簿,,复制Sheet2、Sheet3、Sheet4、Sheet5到该工作簿中
        录制宏,看代码。代码的语法格式,函数说明请参见 EXCEL自带的帮助文档
3.保存后去除更新链接(不更新Sheet2、Sheet3、Sheet4、Sheet5)
        录制宏,看代码。代码的语法格式,函数说明请参见 EXCEL自带的帮助文档
4.打印Sheet2、Sheet3、Sheet4、Sheet5其中Sheet2、Sheet3打印2份,Sheet4、Sheet5打印1份
        录制宏,看代码。代码的语法格式,函数说明请参见 EXCEL自带的帮助文档



如需买现成的代码,请把文件格式上传,标明价格,交易方式。我可以帮你写一个。


******************
*  一切皆有可能  *
******************

.
ACMAIN - Access论坛回贴准则(个人).
.

3#
发表于 2009-4-24 22:06:18 | 只看该作者
kankan ,xuexue
您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|站长邮箱|小黑屋|手机版|Office中国/Access中国 ( 粤ICP备10043721号-1 )  

GMT+8, 2024-6-3 23:30 , Processed in 0.096180 second(s), 27 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表