用VB从EXCEL中导入几列到ACCESS

zyz218 · 发表于 2005-8-18 22:57:00

用VB从EXCEL中导入几列到ACCESS中时的那个列是怎样写的？如在EXCEL中选几列是这样的 A1：C10，F1：H10 那在VB中是怎样写的啊？？？急急急，等等等！！！！请版主与高手帮帮小弟，多谢了！

zyz218 · 发表于 2005-8-18 23:39:00

我想知道在VB中那特定的不连继的几列是怎样写的，帮帮在下！！！！！自已顶一下喽！！！！

zyz218 · 发表于 2005-8-18 23:49:00

编程方式：

请使用 TransferSpreadsheet 方法

示例

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

"Employees","C:\Lotus\Newemps.wk3", True, "A1:G12"请问如果"A1：G2"改为不连续的区域如：A1：D12 F1：G12 时怎样写？

zyz218 · 发表于 2005-8-19 00:23:00

我用"A1：D12","F1:G12" 没有用！！！！！！！！！！！！！！

zyz218 · 发表于 2005-8-19 00:25:00

一个人在自言自语啊！！！！不知海理先生在不在啊！！！！！！还有老鬼得帮帮在下啊

zyz218 · 发表于 2005-8-19 00:54:00

是不是只能是连续的区域啊？是的话那位老大告诉一下在下啊！！！！！！

zyz218 · 发表于 2005-8-19 00:59:00

Private Sub Deleteit()

If Dir("D:\生产计画\" & Date & ".xls") <> "" Then

Kill "D:\生产计画\" & Date & ".xls"

End If

End SubPrivate Sub Workbook_BeforeClose(Cancel As Boolean)

Call Deleteit

ActiveWorkbook.Save

ActiveWorkbook.SaveAs "D:\生产计画\" & Date & ".xls"

End Sub把生产计画文件夹改为你自已的文件夹名，并在D盘建一个名为生产计画的文件夹

zyz218 · 发表于 2005-8-19 00:59:00

宏放在Thisbook 里

zyz218 · 发表于 2005-8-19 01:00:00

这样文件会以当日的日期为文件名进行备份

zyz218 · 发表于 2005-8-19 01:01:00

发错了地方不好意思

帐号		自动登录	找回密码
密码			注册

群介绍
Access培训群 (792054000)
Access免费培训2群 (163530137)
Access免费培训群 (833510950)
Access免费培训群2 (792054000)
Access交流总群 (5004108)

主题相关群

地区相关群[您还没设置居住地]

[与其它组件] 用VB从EXCEL中导入几列到ACCESS

群介绍
主题无相 (随机显示版	同地区群块其他地区)