当前位置:编程学习 > VB >>

EXCEL如何弹出打印设置界面

使用PrintOut打印时,是直接打印的,这个函数的参数可以设置打印机、打印份数等。但是我现在想要用户自己设置打印机、份数等参数,也就是在打印前弹出打印设置对话框,不知道如何实现?就是打印预览界面时,点击打印时会先弹出的那个设置框 --------------------编程问答-------------------- Application.Dialogs(8).Show --------------------编程问答-------------------- 还有一堆调用EXCEL自身的对话框:
Application.Dialogs(1).Show是调用打开对话框 
Application.Dialogs(5或145).Show是调用另存为对话框, 
Application.Dialogs(6).Show是删除文档 
Application.Dialogs(7).Show是页面设置 
Application.Dialogs(8).Show是打印对话框 
Application.Dialogs(9).Show是选择打印机对话框 
Application.Dialogs(12).Show是重排窗口设置对话框 
Application.Dialogs(17).Show宏对话框 
Application.Dialogs(23).Show设置打印标题 
Application.Dialogs(26).Show字体设置对话框 
Application.Dialogs(27).Show显示选项 
Application.Dialogs(28).Show保护工作表 
Application.Dialogs(32).Show重算选项 
Application.Dialogs(39或192).Show排序 
Application.Dialogs(40).Show序列选项 
Application.Dialogs(41).Show模拟运算表 
Application.Dialogs(42或111).Show单元格格式,选择单元格内容的格式 
Application.Dialogs(43).Show选择单元格字体的排列格式,横排或竖排等 
Application.Dialogs(44或134或190).Show字体选择 
Application.Dialogs(45).Show边框格式设置 
Application.Dialogs(46).Show对单元格的保护或隐藏选项 
Application.Dialogs(47).Show列宽设置选项 
Application.Dialogs(52).Show清除对话框 
Application.Dialogs(53).Show选择性粘贴对话框 
Application.Dialogs(54).Show删除对话框 
Application.Dialogs(55).Show插入对话框 
Application.Dialogs(61或110).Show定义名称对话框 
Application.Dialogs(62).Show指定名称 
Application.Dialogs(63或132).Show定位 
Application.Dialogs(64).Show查找 
Application.Dialogs(84).Show设置单元格颜色和图案 
Application.Dialogs(91).Show分列 
Application.Dialogs(94).Show取消或隐藏工作表选择对话框 
Application.Dialogs(95).Show工作区视图等选项 
Application.Dialogs(103).Show选择要激活哪个工作表对话框 
Application.Dialogs(108).Show复制图片选项 
Application.Dialogs(119).Show新建对话框 
Application.Dialogs(127).Show设置行高 
Application.Dialogs(130).Show替换对话框 
Application.Dialogs(137).Show拆分当前窗口 
Application.Dialogs(161).Show设置图表颜色 
Application.Dialogs(170或171).Show移动当前窗口 
Application.Dialogs(191).Show合并计算对话框 
Application.Dialogs(198).Show单变量求解 
Application.Dialogs(199).Show选定成组工作表 
Application.Dialogs(200).Show填充成组工作表

--------------------编程问答-------------------- --------------------编程问答--------------------
引用 1 楼 chinayuppie 的回复:
Application.Dialogs(8).Show

谢谢,已经用了这个函数,但是发现打印完了之后会自动打开EXCEL文件,我不想打开这个EXCEL,怎么办呢? --------------------编程问答--------------------
引用 4 楼 yysjj 的回复:
引用 1 楼 chinayuppie 的回复:Application.Dialogs(8).Show
谢谢,已经用了这个函数,但是发现打印完了之后会自动打开EXCEL文件,我不想打开这个EXCEL,怎么办呢?


自动打开什么文件?
你不是在vba调用的吗? --------------------编程问答--------------------
引用 5 楼 dsd999 的回复:
引用 4 楼 yysjj 的回复:引用 1 楼 chinayuppie 的回复:Application.Dialogs(8).Show
谢谢,已经用了这个函数,但是发现打印完了之后会自动打开EXCEL文件,我不想打开这个EXCEL,怎么办呢?

自动打开什么文件?
你不是在vba调用的吗?

恩,我是用VC的,具体是用一个模板生成一份EXCEL,操作EXCEL过程中都是不显示excel文件的,然后我想做一个打印的功能,打印用了这个Application.Dialogs(8).Show函数,结果,打印完了之后,会自动打开那份EXCEL模板,注意不是我要打印的excel。其实关于这个调用,我也又有一点疑惑:Aplication下面可能有很多books,那这个打印是如何确定是哪一份book呢。 --------------------编程问答--------------------
引用 5 楼 dsd999 的回复:
引用 4 楼 yysjj 的回复:引用 1 楼 chinayuppie 的回复:Application.Dialogs(8).Show
谢谢,已经用了这个函数,但是发现打印完了之后会自动打开EXCEL文件,我不想打开这个EXCEL,怎么办呢?

自动打开什么文件?
你不是在vba调用的吗?

抱歉,前面有一点情况我说错了:结果,打印完了之后,会自动打开那份EXCEL模板,注意不是我要打印的excel测试
————这一点,测试下来,打开的不是模板,就是我需要打印的excel。但是我不想打开这个EXCEL给用户看 --------------------编程问答-------------------- 你自己做个选择打印的窗体吧。

系统的这个打印,估计就得打开excel文件。

你的疑惑“Aplication下面可能有很多books,那这个打印是如何确定是哪一份book呢。 ”

在打印之前先select或active你要打印的workbook。 --------------------编程问答-------------------- 向高手学习了! --------------------编程问答-------------------- application.visible=false
补充:VB ,  VBA
CopyRight © 2012 站长网 编程知识问答 www.zzzyk.com All Rights Reserved
部份技术文章来自网络,