导入数据问题

yori2007

我的目的是把当前文件夹下的“人事信息.xls”文件，导入到access“人事信息1”表中
Dim xls_name As String
Dim xls_path As String
xls_path = CurrentProject.Path
xls_name = "人事信息.xls"    'XLS表名称
DoCmd.TransferDatabase acImport, "dBase 5.0", xls_path, acTable, xls_name, "人事信息1", False, False   
不知道哪里错了阿，是从别人上面载来的，没看懂啊！忘指教。钱没有了阿，有的话一定重金酬谢！

在线等啊

[ 本帖最后由 yori2007 于 2008-1-11 08:18 编辑 ]

雨农

currentproject.path是你当前存放access project的目录，如果你的 人事信息.xls 放在其它地方当然就会报错，找不到文件！
所以你先要确定人事信息.xls的存放位置.

rjacky

举一反三，用DoCmd.TransferSpreadsheet命令，如果能看着下面的帮助自己动手来的话，就不用破财了

操作参数	说明
Transfer Type	所要执行传送操作的类型。在“宏”窗口“操作参数”窗格中的“传输类型”框中选择“导入”、“导出”或“链接”。传输类型的默认值为“导入”。
	注意  Access 项目 (.adp) 不支持这种链接类型。
Spreadsheet Type	用于指明所要导入、导出或链接的电子表格的类型。您可以在选项框中从多个电子表格类型中选择一个。类型的默认值是 Microsoft Excel 8。
	注意   您可以从 Lotus .WK4 文件中导入和链接（以只读方式）数据，但不能将 Microsoft Access 数据以这种电子表格格式导出。Microsoft Access 也不支持用此操作从 Lotus.WKS 或 Microsoft Excel 2.0 版本的电子表格导入、导出或链接数据。如果您要从 Microsoft Excel 2.0 版本或 Lotus .WKS 格式的电子表格中导入或链接数据，则必须在将数据导入或链接到 Microsoft Access 以前，将电子表格转换成 Microsoft Excel 或 Lotus 1-2-3 的最新版本。
Table Name	用于指明 Microsoft Access 表的名称。该表用于导入电子表格数据或链接电子表格数据，以及从该表导出电子表格数据。您可以键入用于导出数据的 Microsoft Access 选择查询的名称，该参数不可省略。
	如果选择传输类型参数为“导入”，而表已经存在，则 Microsoft Access 将电子表格数据追加到该表。否则， Microsoft Access 创建一个新表来存放电子表格数据。
	在 Microsoft Access 2000 中, 当执行 TransferSpreadsheet 操作时，不允许使用 SQL 语句来指定要导出的数据。相反，要先创建一个查询，并在 Table Name 参数中指定查询的名称。
File Name	用于指明所要导入、导出或链接的电子表格文件的名称。该名称包括完整路径。此参数不可缺省。
	当您从 Microsoft Access 导出数据时，Microsoft Access 将创建一个新的电子表格。如果导出数据的文件名与现有的电子表格同名，则 Microsoft Access 将取代现有的电子表格，除非是导出到 Microsoft Excel 5.0 、7.0 或 8.0 版本及 Excel 2000 工作簿中。在后一种情况下， Microsoft Access 将导出数据复制到工作簿中的下一个可用的新工作表中。
	如果从 Microsoft Excel 5.0、7.0 或 8.0 版本，或 Excel 2000 电子表格中导出或链接数据，您可以用 Range 参数指定一个特定的工作表。
Has Field Names	用于指明电子表格的第一行是否包含字段名。如果选择“是”，在导入或链接电子表格数据时，Microsoft Access 将使用该行的名称作为 Microsoft Access 表的字段名。如果选择“否”，Microsoft Access 则将第一行作为普通的数据。该参数的默认值为“否”。
	当将 Microsoft Access 表或选择查询导出到电子表格时，无论您是否选择了该参数，字段名都将被插入到电子表格的第一行中。
Range	用于指明导入或链接的单元格范围。在导入或链接整个电子表格时请将该参数设为空。您可键入一个电子表格范围的名称，或指定导入或链接单元的范围，如 A1:E25 （注意 A1..E25 的语法格式在 Microsoft Access 97 或 Microsoft Access 2000 中无效）。如果要导入或链接到 Microsoft Excel 5.0、7.0、8.0 或 Excel 2000 版本工作表，可以在范围前加前缀：工作表的名称加上感叹号，如 Budget!A1:C7。

yori2007

谢谢

120HZQ

下下来了,先感谢一下,我还没看呢!下下来了,先感谢一下,我还没看呢!

zqlgl

用于指明导入或链接的单元格范围

ququtone

这个很好，非常感谢。

wktt6833

下下来了,先感谢一下,我还没看呢!下下来了,先感谢一下,我还没看呢!

明镜

好是好,但价太贵了.

arrowscupid

谢谢分享