设为首页收藏本站Access中国

Office中国论坛/Access中国论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

12下一页
返回列表 发新帖
查看: 4117|回复: 10
打印 上一主题 下一主题

如何在ACCESS中通过VBA将EXCEL数据导入

[复制链接]
跳转到指定楼层
1#
发表于 2010-11-23 12:58:48 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
在ACCESS中,如何用VBA将EXCEL表中的某几列导入到ACCESS表中的某几个字段时去呢?希望有高手能给与一下代码
例如将下面的EXCEL表中的“代码”、“名称”、“金额”三列导到入ACCESS表中对应的“代码”、“名称”、“金额”三个字段中,同时在“时间”字段中写入系统当天的日期。
代码
名称
数量
金额
A001
A001
10
1000
A002
A002
100
5000
A003
A003
200
8000
 
 
 
 

请高手指点一下,谢谢
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享分享 分享淘帖 订阅订阅
2#
发表于 2010-11-23 17:00:13 | 只看该作者
DoCmd.TransferSpreadsheet acImport, , "要导入的表名", CurrentProject.Path & "\EXCEL名称.xls", True

CurrentProject.Connection.Execute "update 要导入的表名 set  时间=date()"
3#
 楼主| 发表于 2010-11-23 21:06:41 | 只看该作者
谢谢楼上的,可是怎么选择我要导入的列呢?以及哪列对应到表中的哪个字段?
4#
发表于 2010-11-23 21:57:51 | 只看该作者
你在EXCEL把表头设置为表的字段名称一样就OK了
5#
 楼主| 发表于 2010-11-23 22:19:10 | 只看该作者
这么简单啊?非常感谢楼上的!以后有问题再向你请教!
6#
 楼主| 发表于 2010-11-23 22:27:33 | 只看该作者
这么简单啊?非常感谢楼上的!以后有问题再向你请教!
7#
发表于 2011-1-6 23:05:31 | 只看该作者
确实是高手 学习了
8#
发表于 2011-1-8 20:16:05 | 只看该作者
用这个命令有很很大的缺点呀,就是得提前指定路径,请问大侠有什么办法在执行命令行先打开对话框,选中所要导进数数据的方法吗?
9#
发表于 2011-1-12 23:51:40 | 只看该作者
:D
10#
发表于 2011-2-25 00:05:12 | 只看该作者
sinotrust 发表于 2011-1-8 20:16
用这个命令有很很大的缺点呀,就是得提前指定路径,请问大侠有什么办法在执行命令行先打开对话框,选中所要 ...

说得不错.
您需要登录后才可以回帖 登录 | 注册

本版积分规则

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

GMT+8, 2024-5-3 15:23 , Processed in 0.095958 second(s), 33 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

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