VBA的高手看一下了，Delphi问了半天很难解决，友人劝我用VBA宏作一下，关于excel打印按钮控制问题

Question

原贴内容
我想实现在OLE自动化Word文件中打印，在预览下没有打印按钮或者灰掉，和条件满足的情况（如主管批准时）下可以有打印按钮可以打印，请高手给段代码指点一下！这个问题难么，是不是涉及windows print API函数，Delphi 就要歇了？？？？？？？？？？？？D的高手帮看看呀

Answer 1

VBA中:
使用 PrintOut 操作可以打印打开的数据库中的活动对象。可以打印数据表、报表、窗体、数据访问页和模块。DoCmd.PrintOut(PrintRange, PageFrom, PageTo, PrintQuality, Copies, CollateCopies)下面的示例将活动窗体或表的前四页打印两份。DoCmd.PrintOut acPages, 1, 4, , 2