返回列表 上一主題 發帖

為什麼這個檔案用起來這麼慢.....

diabo

帖子
79 
主題
2 
精華
0 
積分
193 
點名
0  
作業系統
Winwos 7 64 bits 
軟體版本
Excel 2003/2007 
閱讀權限
20 
性別
男 
來自
TAIPEI 
註冊時間
2010-8-25 
最後登錄
2019-9-20 
1# 跳轉到 »
發表於 2011-10-27 15:46 | 顯示全部帖子
本帖最後由 diabo 於 2011-10-27 15:52 編輯

回復 1# color790

Querytabe 用完要刪除.....不然會越來越肥.....

到 tmp 或 tmp 2工作表，按一下「名稱方塊」下拉選單....就會看到有 好幾百的....

外部資料_1
外部資料_2
外部資料_3
....
.....
diabo

TOP

diabo

帖子
79 
主題
2 
精華
0 
積分
193 
點名
0  
作業系統
Winwos 7 64 bits 
軟體版本
Excel 2003/2007 
閱讀權限
20 
性別
男 
來自
TAIPEI 
註冊時間
2010-8-25 
最後登錄
2019-9-20 
2#
發表於 2011-10-27 15:58 | 顯示全部帖子
回復 1# color790

用這個清一下不要的QueryTable
  1. Sub DeleteTmpQueryTable()

  3.     Dim QT As QueryTable
  4.     For Each QT In Sheets("tmp").QueryTables
  5.         Debug.Print QT.Name
  6.         QT.Delete
  7.     Next
  8.     For Each QT In Sheets("tmp2").QueryTables
  9.         Debug.Print QT.Name
  10.         QT.Delete
  11.     Next

  13. End Sub
複製代碼
diabo

TOP

diabo

帖子
79 
主題
2 
精華
0 
積分
193 
點名
0  
作業系統
Winwos 7 64 bits 
軟體版本
Excel 2003/2007 
閱讀權限
20 
性別
男 
來自
TAIPEI 
註冊時間
2010-8-25 
最後登錄
2019-9-20 
3#
發表於 2011-10-27 17:04 | 顯示全部帖子
回復 9# color790


    每查一次就會累積一次，可加參數刪除之...
diabo

TOP

diabo

帖子
79 
主題
2 
精華
0 
積分
193 
點名
0  
作業系統
Winwos 7 64 bits 
軟體版本
Excel 2003/2007 
閱讀權限
20 
性別
男 
來自
TAIPEI 
註冊時間
2010-8-25 
最後登錄
2019-9-20 
4#
發表於 2011-10-27 21:44 | 顯示全部帖子
回復 12# 棋語鳥鳴


    YES
diabo

TOP

        靜思自在 : 愛不是要求對方，而是要由自身的付出。
返回列表 上一主題