16,720
社区成员
发帖
与我相关
我的任务
分享请问我想把一个数组的值都导入excel，能不能速度快一点的？
我现在用的是
For row2 = 1 To 500
For col2 = 1 To 50
XLSworkbook2.Worksheets(1).Cells(row2, col2) = y(row2, col2)
Next col2
Next row2
运行起来差不多要一分多钟......有没有快一点的方法？能不能把整个数组一次导入到excel里面呢？谢谢了！！
For row2 = 1 To 500
For col2 = 1 To 50
XLSworkbook2.Worksheets(1).Cells(row2, col2) = y(row2, col2)
Next col2
Next row2
运行起来差不多要一分多钟......有没有快一点的方法？能不能把整个数组一次导入到excel里面呢？谢谢了！！
...全文
请发表友善的回复…
发表回复
lljlll2009 2007-02-09
- 打赏
- 举报
先成内存中申明二维数组把数组中的数字填好后用xlsheet.Range一次性填进去
mapserver 2007-02-09
- 打赏
- 举报
http://support.microsoft.com/kb/311731/zh-cn
http://developer.51cto.com/art/200612/36376.htm
http://developer.51cto.com/art/200612/36376.htm
rainwater84 2007-02-09
- 打赏
- 举报
能不能给个代吗？谢谢。我对数据库不是很熟悉……
mapserver 2007-02-09
- 打赏
- 举报
用如下方式试试：
把excel当成数据源，用oledb去连接它，再把数组通过DataAdapter.Update(dataset)的方式更新回去。
把excel当成数据源，用oledb去连接它，再把数组通过DataAdapter.Update(dataset)的方式更新回去。
