Propriedade OLEDBConnection.Connection (Excel)

Retorna ou define uma cadeia de caracteres que contém definições OLE DB que permitem que o Microsoft Excel se conecte a uma fonte de dados OLE DB. Variant de leitura/gravação.

Sintaxe

expressão. Conexão

Expressão Uma variável que representa um objeto OLEDBConnection .

Comentários

Definir a propriedade Connection não inicia imediatamente a conexão à fonte de dados. Você deve usar o método Atualizar para fazer a conexão e recuperar os dados. Ao usar um arquivo de cubo offline, defina a propriedade UseLocalConnection como True e use a propriedade LocalConnection em vez da propriedade Connection .

Exemplo

Este exemplo cria um cache de Tabela Dinâmica com base em um provedor OLAP e cria um relatório de Tabela Dinâmica com base no cache na célula A3 na planilha ativa.

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 

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.