利用VBA 将access中的所有数据导入到指定的excel中

有个示例，可以模仿。

1、选择菜单中【工具】→【引用】命令项，即可弹出对话框，在下拉列表框中查找并勾选项目“Microsoft ActiveX Data Objects 2.1 Library”，即可完成对ADO的引用。
2、程序：
与Access2007数据库连接语句
在“模块1”中声明公共变量“Public Conn As ADODB.Connection”，方便各个宏对数据库连接变量“Conn”的引用。
宏过程中对数据库连接的定义、打开语句如下：
StrConn = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & ThisWorkbook.Path & "\DbPrice.accdb" & ";Persist Security Info=False"
Set Conn = New ADODB.Connection
Conn.Open StrConn

Sql = "select colno,colname from colno where showmark='1' order by colno"
Set Rs1 = Conn.Execute(Sql)
'将记录集中的数据写到ComboBox1组合下拉列表框中
Do While Not Rs1.EOF
activesheet.cells(i,j).value=Rs1 ("colno")
Rs1.MoveNext
Loop

仅仅实现利用VBA 将access中的所有数据导入到指定的excel中就须要很高的软件熟练度了，尼还要设置按键，编程，祈祷微软的软件工程师能看到你这个问题吧。

vba也比较复杂，用到宏工具，录制宏，然后给宏指定按钮，或者快捷键就可以了。

qq48134262

启动excel
1) 菜单－》工具－》宏－》录制新宏
2）菜单－》数据－》导入外部数据－》导入数据
3）选择你的mdb文件，然后按提示导入
4）点“结束录制”按钮，菜单－》工具－》宏－》vb编辑器，检查vba代码
5）回工作簿，清空所有数据，在适当位置添加按钮，在按钮的click事件里调用宏所对应的方法

用VB吧，好简单了