Excel) (QueryTable.MaintainConnection 屬性
如果從更新資料開始直到關閉活頁簿為止,都要一直與指定的資料來源保持連線,則為 True。 預設值為 True。 可讀寫的 Boolean。
語法
運算式。MaintainConnection
表達 代表 QueryTable 物件的變數。
註解
只有在查詢表或樞紐分析表快取的QueryType屬性設定為xlOLEDBQuery時,才能設定MaintainConnection屬性。
如果預期會對伺服器進行頻繁查詢,則可將此屬性設定為 True,這樣就能縮短重新連線的時間,進而改善執行效能。 如果將此屬性設定為 False,則會關閉開啟的連線。
如果您使用使用者介面匯入資料,Web 查詢或文字查詢中的資料會匯入為 QueryTable 物件,而所有其他外部資料則會匯入為 ListObject 物件。
如果您使用物件模型匯入資料,則必須將 Web 查詢或文字查詢中的資料匯入為 QueryTable,而所有其他外部資料則可以匯入為 ListObject 或 QueryTable。
使用ListObject的QueryTable屬性來存取MaintainConnection屬性。
範例
此範例會根據 OLAP 提供者建立新的樞紐分析表快取,然後根據使用中工作表上 A3 儲存格的快取建立新的樞紐分析表報表。 這個範例會在啟動重設後中斷連線。
With ActiveWorkbook.PivotCaches.Add(SourceType:=xlExternal)
.Connection = _
"OLEDB;Provider=MSOLAP;Location=srvdata;Initial Catalog=National"
.MaintainConnection = False
.CreatePivotTable TableDestination:=Range("A3"), _
TableName:= "PivotTable1"
End With
With ActiveSheet.PivotTables("PivotTable1")
.SmallGrid = False
.PivotCache.RefreshPeriod = 0
With .CubeFields("[state]")
.Orientation = xlColumnField
.Position = 0
End With
With .CubeFields("[Measures].[Count Of au_id]")
.Orientation = xlDataField
.Position = 0
End With
End With
支援和意見反應
有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應。
意見反應
https://aka.ms/ContentUserFeedback。
即將登場:在 2024 年,我們將逐步淘汰 GitHub 問題作為內容的意見反應機制,並將它取代為新的意見反應系統。 如需詳細資訊,請參閱:提交並檢視相關的意見反應