VB之DoCmd.TransferSpreadsheet_id_999

http://blog.sina.com.cn/u/1708460715

首页博文目录关于我

个人资料

微博

加好友发纸条

写留言加关注

博客等级：
博客积分：

博客访问：
关注人气：
获赠金笔：0支
赠出金笔：0支
荣誉徽章：

正文字体大小：大中小

VB之DoCmd.TransferSpreadsheet

(2019-01-30 23:30:19)

标签：

vb

docmd.transferspread

分类：程序设计_VB

DoCmd.TransferSpreadsheet acImport, 8, "表名称", "文件名称", True, ""'导入
DoCmd.TransferSpreadsheet acExport, 8, "表名称", "文件名称", True, ""'导出
DoCmd.TransferSpreadsheet acLink, 8, "表名称", "文件名称", True, ""'链接
8，指的是文件类型为EXCEL

用导入方法可连续把多个外部文件内容导入到一个表中
导入后可用删除查询把空行删除

*********************************************************

TransferSpreadsheet的语法：

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!"

阅读┊ 收藏 ┊ 喜欢 ▼ ┊打印┊举报/Report

前一篇：EXCELRange对象基本操作应用示例

后一篇：VB判断文件是否存在

新浪BLOG意见反馈留言板　欢迎批评指正