如何在Access用VBA对Excel操作比如:取记录数, 拷贝等

smartsoft · 发表于 2011-3-29 12:24

假设Excel一个工作表有1万条记录

在Access中如何用VBA
返回工作表的数据总行数
还有, 怎样将所有数据从一个工作表拷贝到另一个工作表?

补充:Excel工作表是内存文件

[ 本帖最后由 smartsoft 于 2011-3-29 12:39 编辑 ]

guojianlin1985 · 发表于 2011-3-29 12:46

值得学习一下。

zhqang · 发表于 2011-3-29 16:11

我认为用Access对Excel 进行管理更多的是导入和到处操作，如果进行普通的复制、查询，尤其是在数据记录很多的情况，放在Excel中本身就是一种低效的。因此研究这方面的问题似乎没有什么太大的意义。

roych · 发表于 2011-3-29 20:44

引用Excel库，再创建Excel组件即可对Excel进行操作。
但是我觉得奇怪的是，为什么非要在Access里这样使用Excel呢？如果只是这些东西，直接用Excel就可以执行了啊。

smartsoft · 发表于 2011-3-30 06:46

我在用VBA自动搜索存档文件中对应日期的文件
然后想把某一个工作表的所有数据拷贝保存到指定位置，再进行导入工作
数据记录数可用excel.workbooks.sheets(1).cells(1,1).formula="=counta("")
"取得
可到了最后拷贝，无法粘贴到指定文件

roych · 发表于 2011-3-30 21:30

用
sheets(2).range("A2").value= Application.WorksheetFunction.CountA(Sheets(1).Range("A:A"))
试试看？
如果格式类似的话，可以用ADO来提取数据复制到固定位置的。

smartsoft · 发表于 2011-3-31 10:32

经测试上述方法可行
拷贝我用 sheets(1).rows("1:"&records_number).copy
sheets(2).rows("1:1").pastespecial

		自动登录	找回密码
密码			免费注册

[求助] 如何在Access用VBA对Excel操作 比如:取记录数, 拷贝等