Свойство OLEDBConnection.Connection (Excel)

Возвращает или задает строку, содержащую параметры OLE DB, которые позволяют Microsoft Excel подключаться к источнику данных OLE DB. Для чтения и записи, Variant.

Синтаксис

выражение. Подключение

выражение Переменная, представляющая объект OLEDBConnection .

Примечания

Задание свойства Connection не инициирует подключение к источнику данных немедленно. Необходимо использовать метод Refresh для установки подключения и получения данных. При использовании автономного файла куба установите для свойства UseLocalConnection значение True и используйте свойство LocalConnection вместо свойства Connection .

Пример

В этом примере создается кэш сводной таблицы на основе поставщика OLAP, а затем создается отчет сводной таблицы на основе кэша в ячейке A3 активного листа.

With ActiveWorkbook.PivotCaches.Add(SourceType:=xlExternal) 
 .Connection = _ 
 "OLEDB;Provider=MSOLAP;Location=srvdata;Initial Catalog=National" 
 .MaintainConnection = True 
 .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 и обратная связь.