Access窗体查询制作步骤第二课,Access创建模糊查询窗体第二课--Access如何将查询结果导出到Access新表的示例,Access如何将查询结果导出到Excel表的示例,Access查询后导出结果
时 间:2022-08-16 13:36:39
作 者:麥田 ID:11 城市:上海 QQ:3002789054
摘 要:Access窗体查询制作步骤第二课,Access创建模糊查询窗体第二课--Access如何将查询结果导出到Access新表的示例,Access如何将查询结果导出到Excel表的示例,Access查询后导出结果。
正 文:
秋明山(190428731) 2022-08-15 09:02:50
向各位请教,我想将每次查询的内容自动记录到一张表里,应该怎样做才可以实现呢?
二、解决方法:
之前我们学习过教程第一课:Access窗体查询制作步骤,Access创建模糊查询窗体,Access如何通过查询为窗体添加功能,ACCESS实例教程,自学access数据库经典教程(access教程入门基础);Access如何创建窗体查询?创建窗体查询的详细步骤来了【Access软件网】
http://www.accessoft.com/article-show.asp?id=16527
得到了广大Access初学者朋友的青睐,访问量近20万阅读数,看来大家还是喜欢这种基础教程,今天分享一下第二课,即在第一课基础上制作了Access查询后导出结果,我们称为第二课:
Access如何将查询结果导出到Access新表的示例,Access如何将查询结果导出到Excel表的示例。
先看一下制作完成的效果,如下图:
下面讲解制作步骤,如下:
第一步,大家在接着上面第一课学会的基础上,只需要在查询窗体的设计视图,再增加两个按钮,一个命名为“导出到Excel”,如下图:

然后按钮单击事件过程,如下图,

写如下导出代码:
On Error Resume Next
Me.sfrDetail.SetFocus
If Me.sfrDetail.Form.CurrentRecord > 0 Then
ExportToExcel "查询结果"
End If
保存一下即可实现查询后的结果,导出到Excel文件。
第二步,再增加一个命令按钮,我们命名为“导出到Access新表”,如下图:

然后按钮单击事件过程,如下图,

写如下导出代码:
Dim strSQL As String
If ObjectIsExists(acTable, "TEMP_tbl查询结果") Then
DoCmd.DeleteObject acTable, "TEMP_tbl查询结果"
End If
strSQL = "select * into TEMP_tbl查询结果 from 查询窗口"
DoCmd.SetWarnings False
DoCmd.RunSQL strSQL
DoCmd.SetWarnings True
MsgBox "已生成临时表【TEMP_tbl查询结果】"
DoCmd.OpenTable "TEMP_tbl查询结果"
保存一下即可实现查询后的结果,导出到一个新的Access表。
以上就是完整的制作步骤,大家按教程提示操作,就可以学会,如果还没有学会,或者制作到最后功能还没有实现的Access朋友,可以下载一下我制作好的完整示例,作为参考对比一下。
附 件:
导出自定义代码在模块里面,请下载附件将模块导入到你新建的数据库:
需要对查询结果进行打印预览的学习一下第三课:
Access窗体查询制作步骤第三课:Access如何将查询结果打印报表的教程
http://www.accessoft.com/article-show.asp?id=20429
Access软件网QQ交流群 (群号:150401543) Access源码网店
常见问答:
技术分类:
源码示例
- 【源码QQ群号19834647...(12.17)
- 【转载】windows32位A...(01.25)
- 【Access高效办公】本年累...(01.16)
- 【Access源码示例】分隔数...(01.10)
- 【转载】在Access中使用B...(01.04)
- 【Access计算周岁、虚岁示...(12.30)
- 【Access高效办公】本年累...(12.27)
- 【Access源码示例】按输入...(12.06)
- 【Access Dcount函...(12.05)
- 【Access源码示例】按输入...(12.03)

学习心得
最新文章
- 如何设置组合框行来源中的SQL代码...(02.02)
- 《Access快速开发基础教程》免...(02.02)
- 兔年春节Access优惠赠礼活动(02.02)
- 关于Access字段设置为长日期类...(02.01)
- 一个判断是否包含字母的自定义函数(01.31)
- 【Access高效办公】条件格式设...(01.30)
- 提高查询速度的四个技巧(01.28)
- 《Access快速开发基础教程》免...(01.27)
- Access文本框输入法控制小技巧...(01.26)
- 【转载】windows32位API...(01.25)