返回列表 上一主題 發帖

停止自動更新工作表

bully

帖子
14 
主題
7 
精華
0 
積分
59 
點名
0  
作業系統
winxp 
軟體版本
winxp 
閱讀權限
20 
註冊時間
2012-9-24 
最後登錄
2019-6-18 
1# 跳轉到 » 倒序看帖
打印
tT
發表於 2012-10-4 02:03 | 只看該作者

停止自動更新工作表

ー個工作表内有多個査詢,用資料屬性設定ー分鍾更新
請問如用ー個按鈕停止某ーエ作表内所有査詢更新應該點寫,??
收藏 分享

kimbal

帖子
472 
主題
5 
精華
0 
積分
485 
點名
0  
作業系統
Windows 
軟體版本
MS Office 
閱讀權限
100 
性別
男 
來自
香港 
註冊時間
2010-7-4 
最後登錄
2014-12-28 

論壇貢獻勳章
2#
發表於 2012-10-4 13:26 | 只看該作者
  1. Sub test()
  2. Dim ws As Worksheet
  3. Dim qt
  4.     For Each ws In ThisWorkbook.Worksheets
  5.         If ws.QueryTables.Count > 0 Then
  6.             For Each qt In ws.QueryTables
  7.                 qt.BackgroundQuery = False
  8.             Next
  9.         End If
  10.     Next
  11. End Sub
複製代碼
原理是一個一個關掉這個選項
懂得發問,答案就會在其中

今日の一秒は  明日にない
http://kimbalko-chi.blogspot.com
http://kimbalko.blogspot.com

TOP

        靜思自在 : 一個缺口的杯子，如果換一個角度看它，它仍然是圓的。
返回列表 上一主題