[已解决]添加打印按钮 弹出窗口问题

yyd0111606

添加打印按钮 弹出窗口问题 打印问题.rar (57.08 KB, 下载次数: 14)

2014-2-16 00:28 上传

点击文件名下载附件 请看附件

最佳答案

月排行榜 / 总排行榜

zjdh

2014-2-16 08:28

1. Private Sub CommandButton1_Click()
   
2.     If MsgBox("真的需要保存及打印吗？", 4, "打印确认") = 7 Then Exit Sub
   
3.     Sheet2.Select
   
4.     Application.Dialogs(8).Show
   
5. End Sub

复制代码

跳转到最佳答案楼层

zjdh

1. Private Sub CommandButton1_Click()
   
2.     If MsgBox("真的需要保存及打印吗？", 4, "打印确认") = 7 Then Exit Sub
   
3.     Sheet2.Select
   
4.     Application.Dialogs(8).Show
   
5. End Sub

复制代码

yyd0111606

zjdh 发表于 2014-2-16 08:28

非常感谢

yyd0111606

yyd0111606 发表于 2014-2-17 14:23
非常感谢

Private Sub CommandButton1_Click()
    If MsgBox("真的需要保存及打印吗？", 4, "打印确认") = 7 Then Exit Sub
    Sheet2.Select
    Application.Dialogs(8).Show
End Sub



打印后 怎么返回sheet1表