一个很奇怪的现象关于跨工作薄取数！

lj1226189 · 发表于 2018-9-29 08:42

With GetObject(ThisWorkbook.Path & "\" & "原始库.xlsx")

            With .Sheets(1)
                  arr = .Range("b1:b1000000")
                  arr1 = .Range("m1:m1000000")
            End With

      End With

Sheet2.[a1].Resize(1000000, 1) = arr
Sheet2.[b1].Resize(1000000, 1) = arr1

用这个代码跨工作取数  当我打开工作薄取另一个“原始库.xlsx” 里数据时速度需要50多秒！！但是我如果再次运行代码时取数只要不到20秒或者我改一下代码取另一个“原始库2.xlsx”数据时  速度也只有不到20秒！！

也就是我第一次打开工作薄取数时速度就很慢不关闭再取数就很快不知什么原因？？

大家能否帮我分析一下谢谢！！

wj2368 · 发表于 2018-9-29 08:49

其实不打开不太正确，只是后台打开的，只是隐藏着看不见

lj1226189 · 发表于 2018-9-29 08:53

wj2368 发表于 2018-9-29 08:49
其实不打开不太正确，只是后台打开的，只是隐藏着看不见

这个我知道但是我就是弄不明白取过一次数后再取数速度就快很多

wj2368 · 发表于 2018-9-29 08:59

lj1226189 发表于 2018-9-29 08:53
这个我知道但是我就是弄不明白取过一次数后再取数速度就快很多

打开的线程还留居在内存吧，你试一下，全部关闭Excel,再重新打开运行的情况

我是来讨说法的 · 发表于 2018-9-29 09:20

关闭所有excel
手动打开第一个文件，然后再打开第二个文件
两个文件打开的速度一样吗？

lj1226189 · 发表于 2018-9-29 09:30

我是来讨说法的发表于 2018-9-29 09:20
关闭所有excel
手动打开第一个文件，然后再打开第二个文件
两个文件打开的速度一样吗？

但是我试过好多其它方取数 ado open等就不会出现这种情况

jiangxiaoyun · 发表于 2018-9-29 09:49

本帖最后由 jiangxiaoyun 于 2018-9-29 10:29 编辑

少了打开excel程序的响应时间吧。

sheeboard · 发表于 2018-9-29 10:35

其实是数据文件读入到内存里花时间长，不用复杂算法的处理起来很快的。所以大数据都是放服务器上不关机的，甚至还有spark这种分布式内存系统。

我是来讨说法的 · 发表于 2018-9-29 14:04

lj1226189 发表于 2018-9-29 09:30
但是我试过好多其它方取数 ado open等就不会出现这种情况

你是怎么测试的，测试的是多大的数据量，就下这个结论？

ADO获取外部文件的数据照样是第一次没有后面的快

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

[求助] 一个很奇怪的现象关于跨工作薄取数！

评分

[求助] 一个很奇怪的现象 关于跨工作薄取数！

评分

[求助] 一个很奇怪的现象关于跨工作薄取数！