设为首页收藏本站Access中国

Office中国论坛/Access中国论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

返回列表 发新帖
查看: 3167|回复: 6
打印 上一主题 下一主题

[窗体] 如何在后台打开数据表,复制其记录粘到Excel中?

[复制链接]
1#
发表于 2011-1-31 20:47:34 | 显示全部楼层
本帖最后由 todaynew 于 2011-1-31 21:29 编辑

支持!
CopyFromRecordset绝对代表先进生产力的发展方向。

aydl1014 同志继续研究一下,是否能将字段名一并copy到Excel中(指不用循环读Rst.Fields(i).Name的方法)。我想这样的话,就可以产生导出到Excel的第四种方法了。

2#
发表于 2011-2-1 06:45:38 | 显示全部楼层
aydl1014 发表于 2011-1-31 21:39
导入字段名,可以参照下面代码

ThisWorkbook.Worksheets("客户表").Range("A1:B1").Value = Array("Cust ...

这个办法代表落后生产力,还不如Rst.Fields(i).Name循环获得,呵呵。
您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|站长邮箱|小黑屋|手机版|Office中国/Access中国 ( 粤ICP备10043721号-1 )  

GMT+8, 2024-5-16 05:28 , Processed in 0.100399 second(s), 24 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表