请问如何用vba导出引用了窗体值的查询

haohu0406 · 发表于 2021-3-26 09:31

本帖最后由 haohu0406 于 2021-3-26 11:12 编辑

请问如何从excel或者access的VBA将引用了access窗体值的所有查询（所有查询都引用了）导出到一个excel工作簿。我自己的代码提示缺少参数，原因是引用了窗体的值，窗体的值换成确定数值则正常，但是我需要的是必须引用窗体值。

haohu0406 · 发表于 2021-3-26 10:13

自己先顶顶

haohu0406 · 发表于 2021-3-26 10:55

haohu0406 发表于 2021-3-26 10:13
自己先顶顶

再顶顶，等大神

roych · 发表于 2021-3-26 10:57

1、大部分情况下，窗体是需要打开才能获取控件的值。如果不想打开的话，可以考虑Form_窗体名!控件名的办法，但如果控件绑定了数据源，还是得打开。
2、查询对象为DAO.QueryDefs(N) ，其中N=0~count-1。因此可以通过循环来读取各个查询的Name。
3、导出excel可以用docmd.transferSpreadSheet或者docmd.outputTo，把查询名传入即可，具体用法请自行百度。
4、印象中，自带导出菜单可以考虑批量导出组件，当然，没法读取窗体控件后再导出。
5、自己综合考虑衡量下，选择合适的办法来实现。

zpy2 · 发表于 2021-3-26 11:26

haohu0406 发表于 2021-3-26 10:55
再顶顶，等大神

参数查询。。。。f1搜
dao querydef
ado command
对象

haohu0406 · 发表于 2021-3-26 11:55

zpy2 发表于 2021-3-26 11:26
参数查询。。。。f1搜
dao querydef
ado command

尝试了ado command，搞不出来，谢谢提供的建议

roych · 发表于 2021-3-29 14:36

如果不需要格式化excel文件（比如，加粗标题，加背景色什么的），可以处理得更简单一些。微信截图_20210329142906.png

我这里就不加错误处理了（除非查询语法本身有问题，否则也不存在错误）。
由于你这个窗体不绑定数据，所以还是需要打开窗体，选择数据后才能导出查询（在不打开窗体的情况下，运行查询会出错）。
最后一点，个人建议加上按钮吧。详见附件

科目余额表数据库.rar (171.97 KB, 下载次数: 3)

		自动登录	找回密码
密码			免费注册

[求助] 请问如何用vba导出引用了窗体值的查询

评分

评分