以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  使用这段代码操控EXCEL很慢  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=142997)

--  作者:zhuxinhui
--  发布时间:2019/11/11 15:18:00
--  使用这段代码操控EXCEL很慢
Dim k As Integer = 9
For i As Integer = 1 To b
  If WT.cells(i,1).value =  e.Form.controls("Combobox1").value Then
     For j As Integer = 1 To 9       
        Ws.Cells(k,j).value = WT.Cells(i,j + 2).value
        Ws.Cells(k,10).value = WT.Cells(i,2).value
        Ws.Cells(k,11).value = WT.Cells(i,13).value
     Next
        k = k+1
  Else
  End If
Next


使用这段代码操控EXCEL很慢,表格才1W都不到,过滤数据都需要好几分钟,不知有什么方法可以快些

--  作者:有点蓝
--  发布时间:2019/11/11 15:55:00
--  
那就试试导入Foxtable,处理后,再重新导出
--  作者:zhuxinhui
--  发布时间:2019/11/11 16:51:00
--  
导入FOXTABLE临时表行不行
现在做着的是对帐单,花了整整三日了,操控EXCEL就基本上编写好了,现在就是很慢
如果导入FOXTABLE再处理没有EXCEL甘方便,FOXTABLE感觉上有些受限制,要分开很多块才行

--  作者:zhuxinhui
--  发布时间:2019/11/11 16:53:00
--  
可能把主体部份导入FOXTABLE临时表,再过滤导出会快些,
老师有这个相关的代码吗?自已做每个按钮都得花成日时间,有样版学习下快很多


--  作者:有点蓝
--  发布时间:2019/11/11 17:00:00
--  
添加临时表:http://www.foxtable.com/webhelp/topics/0679.htm