如何用vba将ACCESS窗体和查询导入另一个数据库中

Access是微软Office组件的数据库软件，使用它可以进行简单的数据库软件的开发。但Access的图表功能和数据分析功能不如Excel强大，常用的做法可以将Access中的数据导入Excel中再进行处理。

代码利用ADO组件可以方便地对各种数据进行连接和访问。ADO组件中的Connection对象可以实现对数据库的连接，并可以快速实现SQL语句的执行，然后再用VBA将SQL查询的结果输出到Excel表格中。

打开VBE窗口，选择菜单“工具”一“引用”，勾选MicrosoftActiveXDataObjects2.8Library，并单击“确定”按钮。

利用ADO连接数据库ADO的全称是ActiveXDataObject，是一个用于存取数据源的COM组件，用以快速实现各种数据库的连接、读取、写入。在ADO组件中有一个Connection对象，利用Connection对象的Open方法可以实现数据库的连接。

一般有2种方式。

1种是在Sheet页面设计：

开发工具：选中设计模式，在插入中选择你要的控件，托到Sheet页面就行。

如果控件不够，就点击“ActiveX控件”右下的的交叉锤子扳手图标。

就可以添加你想要的控件了

另外一种是Form界面的。点击上图的“查看代码”，就可以移动到后台，Alt+F11 也可以。

项目右击，新建一个“用户窗体”

和刚才一样，拖动控件来设计。

如果控件不够的话，也可以追加的：

顺便说一句，VBA一般连接数据库，一般是要导入引用的，从网上copy别人的代码，运行的时候经常报错，有些情况就是没有导入引用。

我平时用SQLServer

后台VBA连接SQLServer，我连接的是Objects 2.8

新建一个数据库有两种方法:一种是创建一个空数据库，即建立一个没有表、查询、窗体和报表等内容的数据库:另一种方法是使用Access中提供的数据库模板创建数据库，即通过对向导所提出的选项和不同选择来设计窗体、查询和报表等，从而建立一个完整的数据库。下面将使用第一种方法建立数据库。(1)在人c~窗口中单击【文件】菜单.在下拉菜单中选择【新建】项，将得到如图6.1所示的【新建】对话框。(2)单击【空数据库】图标，即会显示“文件新建数据库”对话框，如图6.2所示。图6.1【折建】对话框(3)在【文件名】文本框中输入要保存数据库的文件夹及新建的数据库名，如"C: est.mdb"，然后单击【创建】按钮，即可创建一个名为“test"的数据库，如图6.3所示。

---