求助:有产品A、B、C……,每个产品都要打印出表1、表2、表3。怎么样可以按一次打印按纽将这些产品需要打印的表单都打出来呢?
我自己写的代码只能打印出每个产品的表1,和最后一个产品的所有表单。请高手帮改!!!
修改了一下,应该可以了,试试看,还有没解决的请联系我。
Sub 打印() Dim Sh As Worksheet
'For I = Range("M12") To Range("M13") Range("M14") = I For Each Sh In Worksheets Sh.PrintOut '打印 Next Next IEnd Sub
ChgtrYlq.rar
2010-4-30 15:08 上传
点击文件名下载附件
11.91 KB, 下载次数: 0
求助……打印……宏?VBA?
xrhM6r2F.rar
2010-5-2 11:52 上传
10.13 KB, 下载次数: 0
GdAHakZC.rar
2010-5-2 11:59 上传
10.13 KB, 下载次数: 2
使用道具 举报
难度不大,但真没看懂你的详细情况。
你的附件中已有部份代码,可以在此基础上改改就可实现目的。
本版积分规则 发表回复 回帖后跳转到最后一页
小黑屋|手机版|Archiver|Excel精英培训 ( 豫ICP备11015029号 )
GMT+8, 2024-6-15 12:21 , Processed in 0.632454 second(s), 14 queries , Gzip On, Yac On.
Powered by Discuz! X3.4
Copyright © 2001-2020, Tencent Cloud.