Excel 宏 控件的问题!!求大神指点!!急急急求!!

excel工作簿如下图,有4个工作表想要实现的功能:1.利用宏实现表格打印,即选择相应复选框后,单击打印按钮,即可以实现相应表格打印;2.sheet1有好几页,如果选中需... excel工作簿如下图,有4个工作表

想要实现的功能:
1.利用宏实现表格打印,即选择相应复选框后,单击打印按钮,即可以实现相应表格打印;
2.sheet1有好几页,如果选中需要打印该表格,要先打印1/3/5页,然后弹出含有“确定”按钮的对话框,提示“请依次放入sheet1的1、3、5页 确定”,单击对话框中“确定”按钮后可以继续打印sheet1的2、4、6页(目的是在没有双面打印功能的时候,进行手动双面打印)
请大神务必介绍一下如何添加对话框。跪拜!
展开
 我来答
设谋H
2015-11-19 · TA获得超过391个赞
知道小有建树答主
回答量:93
采纳率:0%
帮助的人:42.9万
展开全部
1,
Sub 按钮3_单击()----自己设名称
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True

End Sub
2,
Sub 按钮4_单击()
ActiveWindow.SelectedSheets.PrintOut From:=1, To:=1, Copies:=1, Collate _
:=True
ActiveWindow.SelectedSheets.PrintOut From:=3, To:=3, Copies:=1, Collate _
:=True
ActiveWindow.SelectedSheets.PrintOut From:=5, To:=5, Copies:=1, Collate _
:=True
End Sub
上面 的from 1/3/5 to 1/3/5,要变成2/4/6,新建一个控件改一下即可。
追问
大体方法有些看不懂,不知道怎么试,先自己学习一下,再请教大神。
本回答被提问者和网友采纳
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
WDZZYC
2015-11-19 · TA获得超过751个赞
知道小有建树答主
回答量:849
采纳率:69%
帮助的人:404万
展开全部

帮你做了一个,有问题再联系我

追问
你好!大神
追答
在我电脑上测试能达到你的要求,你电脑上不行吗?
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式