如何把窗体中的数据导出到EXCEL表格?

sgrshh29 · 发表于 2006-6-16 17:20

大概是这样的意思。

9dRyY7to.rar (15.68 KB, 下载次数: 77)

james.wan · 发表于 2006-6-16 18:11

查询导出的方法（窗体类推）：

Dim qdf As QueryDef
SQL = "select * from 表1"
Set qdf = CurrentDb.CreateQueryDef("mine", SQL)
DoCmd.OutputTo acOutputQuery, "mine", acFormatXLS, "temp.xls", True

sky82聊聊 · 发表于 2006-6-18 20:30

怎么把新建立的查询删除掉啊?

sky82聊聊 · 发表于 2006-6-18 20:35

怎么感觉不对啊? QueryDefs.Delete qdf.Name

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