Access VBA教程:TransferSpreadsheet方法

在 Visual Basic 中,TransferSpreadsheet方法执行TransferSpreadsheet 操作。

expression.TransferSpreadsheet(TransferType, SpreadsheetType, TableName, FileName, HasFieldNames, Range, UseOA)

expression   必需。返回“Applies To”列表中的一个对象的表达式。

TransferType  可选AcDataTransferType。

AcDataTransferType 可以是下列 AcDataTransferType 常量之一:
acExport
acImport 默认
acLink

如果将该参数留空,将采用默认常量 (acImport)。

SpreadsheetType  可选AcSpreadSheetType。

AcSpreadSheetType 可以是这些 AcSpreadSheetType 常量之一:
acSpreadsheetTypeExcel3
acSpreadsheetTypeExcel4
acSpreadsheetTypeExcel5
acSpreadsheetTypeExcel7
acSpreadsheetTypeExcel8 默认
acSpreadsheetTypeExcel9 默认
acSpreadsheetTypeLotusWJ2 - 仅适用于日文版
acSpreadsheetTypeLotusWK1
acSpreadsheetTypeLotusWK3
acSpreadsheetTypeLotusWK4

注意   可以链接 Lotus 1-2-3 电子表格文件中的数据,但是这些数据在 Microsoft Access 中是只读的。可以导入自和链接到 Lotus .WK4 文件,但是不能将 Microsoft Access 数据导出为这种电子表格格式。Microsoft Access 也不再支持使用该方法对 Lotus .WKS 或 Microsoft Excel 2.0 版电子表格数据的导入、导出或链接。

如果将该参数留空,将采用默认常量 (acSpreadsheetTypeExcel8)。

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

FileName  可选 Variant 型。字符串表达式,表示要从其中导入、导出到或链接到的电子表格的名称与路径。

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

Range  可选 Variant 型。字符串表达式,表示电子表格中单元格的有效范围或范围名称。该参数仅可用于导入。若要导入整个电子表格,请将该参数留空。导出到电子表格时,必须将该参数留空。如果输入了一个范围,导出将失败。

UseOA  可选 Variant 型。

说明

有关该操作及其参数如何使用的详细信息,请参阅该操作的主题。

语法中的可选参数允许留空,但是必须包含参数的逗号。如果将位于末端的参数留空,则在指定的最后一个参数后面不需使用逗号。

注意   还可以使用ActiveX 数据对象 (ADO) 来创建链接。方法是,使用Recordset对象的ActiveConnection属性。

VBA示例

下面的示例在 Lotus 电子表格 Newemps.wk3 的指定范围内将表导入到 Microsoft Access 的“Employees”表,并用电子表格中的第一行作为字段名。


DoCmd.TransferSpreadsheet acImport, 3, _
    "Employees","C:\Lotus\Newemps.wk3", True, "A1:G12"

上页:Access VBA教程:TransferDatabase方法 下页:Access VBA教程:TransferText方法

Access VBA教程:TransferSpreadsheet方法

Access VBA教程:TransferText方法 Access VBA教程:Add方法
Access VBA教程:AddFromString方法 Access VBA教程:AddItem方法
Access VBA教程:AddToFavorites方法 Access VBA教程:ApplyTheme方法
Access VBA教程:BuildCriteria方法 Access VBA教程:Circle方法
Access VBA教程:CloseConnection方法 Access VBA教程:CloseCurrentDatabase方法
Access VBA教程:CodeDb方法 Access VBA教程:CompactRepair方法
Access VBA教程:ConvertAccessProject方法 Access VBA教程:CopyDatabaseFile方法
Access VBA教程:CreateAccessProject方法 Access VBA教程:CreateControl方法
Access VBA教程:CreateDataAccessPage方法 Access VBA教程:CreateEventProc方法
Access VBA教程:CreateForm方法 Access VBA教程:AddFromFile方法
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号