加载中…
个人资料
  • 博客等级:
  • 博客积分:
  • 博客访问:
  • 关注人气:
  • 获赠金笔:0支
  • 赠出金笔:0支
  • 荣誉徽章:
正文 字体大小:

Access VBA 导出为 EXCEL

(2013-06-27 11:39:24)
分类: EXCEL应用示例

DoCmd.TransferSpreadsheet 方法 (的访问)

Office 2013
1(共 1)对本文的评价是有帮助 - 评价此主题

TransferSpreadsheet方法执行 Visual Basic 中的 TransferSpreadsheet 操作。

表达式TransferSpreadsheetTransferTypeSpreadsheetType表名文件名HasFieldNames区域UseOA

表达式 一个表示DoCmd对象的变量。

参数

名称

必需/可选

数据类型

说明

TransferType

可选

AcDataTransferType (机器翻译)

传输的类型。默认值为 acImport

SpreadsheetType

可选

AcSpreadSheetType (机器翻译)

用于指明所要从中导入、导出到或链接到的电子表格的类型。 8 = 97/2000 XLS

TableName

可选

Variant

字符串表达式,表示要向其中导入电子表格数据、从中导出电子表格数据或链接电子表格数据的 Microsoft Office Access 表的名称,或要将其结果导出到电子表格的 Access 选择查询的名称。

FileName

可选

Variant

字符串表达式,表示要从其中导入、导出到或链接到的电子表格的文件名与路径。

HasFieldNames

可选

Variant

使用 True (-1) 可以在导入或链接时,将电子表格中的第一行用作字段名。使用 False (0) 可以将数据表第一行看作普通数据。如果将该参数保留为空,将采用默认值 (False)。在将 Access 表或选择查询数据导出到电子表格中时,无论为该参数输入了何值,字段名称都将插入到电子表格的第一行中。

Range

可选

Variant

字符串表达式,即有效的单元格范围或电子表格范围的名称。此参数仅适用于导入。将此参数留空,要导入整个电子表格。导出到电子表格时,必须将该参数保留为空。如果输入了一个范围,导出将失败。

UseOA

可选

Variant

不支持该参数。

可以使用 TransferSpreadsheet 方法在当前的 Access 数据库或 Access 项目 (.adp) 和电子表格文件之间导入或导出数据。也可将 Microsoft Excel 电子表格中的数据链接到当前的 Access 数据库。通过链接的电子表格,您可以用 Access 查看和编辑电子表格数据,同时还允许从 Excel 电子表格程序中对数据进行完全访问。还可以链接 Lotus 1-2-3 电子表格文件中的数据,但这些数据在 Access 中是只读的。

http://i.msdn.microsoft.com/dynimg/IC589958.gif 注释

您可以使用 ActiveX 数据对象 (ADO)记录集对象使用ActiveConnection属性创建的链接。

下面的示例从指定范围的访问雇员表到 Lotus 电子表格 Newemps.wk3 导入数据。它使用电子表格的第一行作为字段名。

DoCmd.TransferSpreadsheet acImport, 3, _ 
 "Employees","C:\Lotus\Newemps.wk3", True, "A1:G12"
----------------------------------------------------
Private Sub Command19_Click()
DoCmd.TransferSpreadsheet acExport, 8, "Query2", "N:\ERP-System\Info\test.xls", False
'DoCmd.Close
End Sub

0

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

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

新浪简介 | About Sina | 广告服务 | 联系我们 | 招聘信息 | 网站律师 | SINA English | 产品答疑

新浪公司 版权所有