Поделиться через

СВОЙСТВО OLEDBConnection.Connection (Excel)

  • Статья

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

Синтаксис

expression. Подключения

Выражение Переменная, представляющая объект 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 и обратная связь.