Access培训
网站公告
·Access快速平台QQ群号:277422564    ·Access快速开发平台下载地址及教程    ·欢迎添加微信交流账号:AccessoftChu    ·如何快速搜索本站文章|示例|资料    
您的位置: 首页 > 技术文章 > Access数据库-表

用VBA编程把Excel表中数据追加到access表中

时 间:2010-03-21 00:00:00
作 者:duwei   ID:9152  城市:厦门
摘 要:用VBA编程把Excel表中数据追加到Access表中
正 文:

Private Sub Command0_Click()

DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel9, "temp", "c:\temp.xls", yes

End Sub

 'acImport  导入
    'acSpreadsheetTypeExcel9  EXCEL 表的类型
    '"temp"  : 导入后,表的名称(字符串)
    '"c:\temp.xls"  :  excel 源表的路径和名称。
    'yes : excel 表中的第一行作为 新表 的 字段名称。



Access软件网官方交流QQ群 (群号:864245409)       access源码网店

最新评论 查看更多评论(2)

2019/6/19 15:47:07hi老大
这是替换,不是追加

2012/10/17 0:21:02lmqlt
Docmd.TransferSpreadsheet TransferType, SpreadsheetType, TableName, FileName, HasFieldNames, Range, UseOA  

针对Excel,其中Range的用法如下: 

""(空字符串):表示工作簿的第一个工作表; 

"Sheet1!A1:D10":表示工作表Sheet1的A1到D10区域; 

"Sheet2!":表示整个Sheet2工作表。

例如:
将Book1的Sheet1和Sheet2用TransferSpreadsheet方法导入Access mdb中。
Docmd.TransferSpreadsheet acImport, , "temp1", "C:\Book1.xls", False, "Sheet1!"
Docmd.TransferSpreadsheet acImport, , "temp2", "C:\Book1.xls", False, "Sheet2!"
注意:不是"yes"而是“true”


发表评论您的评论将提升作者分享的动力!快来评论一下吧!

用户名:
密 码:
内 容:
 

常见问答

技术分类

相关资源

关于我们 | 服务条款 | 在线投稿 | 友情链接 | 网站统计 | 网站帮助