如何在报表打印页面添加一个导出格式为excel的命令按钮

操作过程参考：

1、在模块中，建立一个不带参数的函数，实现你的要求；

2、在Access的自定义工具栏中，找到“快捷菜单”，添加一个新菜单，命名为“报表菜单”；添加一个空白命令，命名为“至Excel”，再并在“所在操作”中把你刚才做好的函数名写进去

格式：=FunctionName()

3、在报表的设计视图中，找到属性窗口，在“其他”选项卡中，找到“快捷菜单”组合框，把“报表菜单”选上，并保存设计。

函数的写法，

1、最好根据报表记录源，生成一个临时表；

2、利用代码，将生成的临时表导出为Excel格式；

3、删除刚才的临时表。

导出函数代码参照：

http://www.accessoft.com/bbs/showtopic.asp?ID=10308