请问：如何将Access表中的数据导入到Exel中，非常非常感谢

Question

尽可能不使用EditGridLib.ocx控件，它总是依赖于连接打印机，如果连不上打印机就会报错
请问有没有其他的好办法

Answer 1

SQL SERVER 与ACCESS、EXCEL的数据转换http://www.microsoft.com/china/community/Column/31.mspx

Answer 2

Private Sub Command2_Click()
On Error Resume Next
CommonDialog1.ShowOpen
fln = CommonDialog1.FileName
Dim cnn As ADODB.Connection
Set cnn = New ADODB.Connection
cnn.ConnectionString = "..."
cnn.Open
Sql = "SELECT * into [excel 8.0;database=" & fln & "].sheet1 from yourtable"
cnn.Execute Sql
cnn.Close
Set cnn = NothingEnd Sub