2011-07-13 64 views
0

在Access中,我知道有一个选项“与Microsoft Office Excel中分析它”,但我创建一个数据库和人请求此想要一个形式做同样的上一个命令按钮“使用Microsoft Office Excel分析它”按钮可以做到这一点。所以我的问题是任何人都可以帮我写VBA代码到MS Access查询导出到Excel中,已格式化的确切方式“与Microsoft Office Excel中分析它”呢?出口MS Access查询到Excel

回答

2

我会用DoCmd.TransferSpreadsheet ...除非你说你想要的确切相同的格式,你从得到“与Microsoft Office Excel中分析它

要复制的格式,你可以使用:

DoCmd.RunCommand acCmdOutputToExcel 

然而,从创建活动对象电子表格,如果从窗体上一个命令按钮运行,形式将是活动对象......等等,你会创建表单的电子表格...这是不是你想要的。

因为你的目标是创建一个查询的电子表格,为用户添加一个文本框(txtQueryName),以表明其查询到出口。

,您的命令按钮单击事件可能是这样的:

Private Sub cmdAnalyzeWithExcel_Click() 
    DoCmd.OpenQuery Me.txtQueryName 
    DoCmd.RunCommand acCmdOutputToExcel 
    DoCmd.Close acQuery, Me.txtQueryName 
End Sub 

也就是说粗糙,但它为我工作与Access 2003。我认为更好的办法是加载一个组合或列表框使用可用的查询名称进行控制,并让用户从那里进行选择。你为此而自立。

如果是我,我不会尝试从一个命令按钮做到这一点。我认为自定义菜单或色带项目会更合适。或者,它可能是简单的创建一个AutoKeys宏中它分配一个键盘快捷键来运行一个程序(或调用另一个宏)这确实DoCmd.RunCommand acCmdOutputToExcel如果AutoKeys的声音对你有好处,看到Run an Access macro by using a keyboard shortcut