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. Ligaçã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. Tem de utilizar o método Atualizar para efetuar a ligação e obter os dados. Ao utilizar um ficheiro de cubo offline, defina a propriedade UseLocalConnection como Verdadeiro e utilize a propriedade LocalConnection em vez da propriedade Ligação .

Exemplo

Este exemplo cria uma cache de tabela dinâmica com base num fornecedor OLAP e, em seguida, cria um relatório de tabela dinâmica com base na cache na célula A3 na folha de cálculo 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.