以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [讨论] FOX 的 EXCEL代碼效率太低了?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=53294)

--  作者:don
--  发布时间:2014/7/4 12:25:00
--  [讨论] FOX 的 EXCEL代碼效率太低了?
系統: W7,i5-2400CPU,4G(RAM),32位

Dim st As Date = Date.Now
Dim ft As String = "D:\\Met\\Reports\\PPS.xls"      
\'文件6.43M,其中一表8000行,16列,其他三表數據很少       
Dim Book As New XLS.Book(ft)
Dim Sheet As XLS.Sheet = Book.Sheets(0)

Output.Show("耗时: " & (Date.Now - st).TotalSeconds & "秒") \'计算
\'耗时: 2.5481457秒

--  作者:jspta
--  发布时间:2014/7/4 12:32:00
--  

Dim Book As New XLS.Book(ft)

 

这句话估计占用超过2.4秒。

 

你可以自己测试手动打开这个文件需要多久


--  作者:don
--  发布时间:2014/7/4 13:21:00
--  
以下是引用jspta在2014-7-4 12:32:00的发言:

Dim Book As New XLS.Book(ft)

 

这句话估计占用超过2.4秒。

 

你可以自己测试手动打开这个文件需要多久


確實超出2秒!


因此文件本來有編輯權限密碼,用Dim Book As New XLS.Book(ft)後,發現原來的編輯權限密碼沒有了,但會彈出提示窗口


--  作者:有点甜
--  发布时间:2014/7/4 14:01:00
--  
 回复3楼,可以用vba去操作打开,可以设置打开密码的等的。
--  作者:don
--  发布时间:2014/7/4 15:04:00
--  
以下是引用有点甜在2014-7-4 14:01:00的发言:
 回复3楼,可以用vba去操作打开,可以设置打开密码的等的。
因此文件的密碼經常改變,因此不想用VBA