Classe OLEDBConnection (Excel VBA)

A classe OLEDBConnection representa a conexão OLE DB.

Set

Para usar uma variável de classe OLEDBConnection, ela primeiro precisa ser instanciada por exemplo

Dim ole as OLEDBConnection
Set ole = ActiveWorkbook.Connections(1).OLEDBConnection

As variáveis ​​de classe OLEDBConnection podem ser definidas usando o procedimento WorkbookConnection.OLEDBConnection.

Métodos

Estes são os principais métodos da classe

CancelRefresh - Cancela todas as operações de atualização que estejam em andamento da conexão OLE DB especificada.

MakeConnection - Estabelece uma conexão para a conexão OLE DB especificada.

Reconnect - Derruba e reconecta a conexão especificada.

Refresh - Atualiza uma conexão OLE DB.

SaveAsODC - Salva a conexão OLE DB como um arquivo de conexão de dados do Microsoft Office.

Propriedades

ADOConnection Retorna um objeto de conexão ADO se o cache de tabela dinâmica estiver conectado a um fonte de dados OLE DB. Somente leitura.

Dim adoADOConnection As ADOConnection
adoADOConnection = ActiveWorkbook.Connections(1).OLEDBConnection.ADOConnection

AlwaysUseConnectionFile True se o arquivo de conexão sempre é usado para estabelecer uma conexão com a fonte de dados. Boolean de leitura/gravação.

ActiveWorkbook.Connections(1).OLEDBConnection.AlwaysUseConnectionFile = True

BackgroundQuery True se as consultas da conexão OLE DB forem realizadas de maneira assíncrona em segundo plano. Boolean de leitura/gravação.

ActiveWorkbook.Connections(1).OLEDBConnection.BackgroundQuery = True

CalculatedMembers Retorna a coleção CalculatedMembers da conexão especificada. Somente leitura.

Dim cmsCalculatedMembers As CalculatedMembers
Set cmsCalculatedMembers = ActiveWorkbook.Connections(1).OLEDBConnection.CalculatedMembers

CommandText Retorna ou define a sequência de comando para a fonte de dados especificada. de leitura/gravação.

ActiveWorkbook.Connections(1).OLEDBConnection.CommandText =

CommandType Retorna ou define uma das constantes XlCmdType. Leitura/gravação XlCmdType.

ActiveWorkbook.Connections(1).OLEDBConnection.CommandType = xlCmdCube

Connection 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. de leitura/gravação.

ActiveWorkbook.Connections(1).OLEDBConnection.Connection = "OLEDB;Provider=MSOLAP;Location=srvdata;Initial Catalog=National"

EnableRefresh True se a conexão puder ser atualizada pelo usuário. O valor padrão é True. Boolean de leitura/gravação.

ActiveWorkbook.Connections(1).OLEDBConnection.EnableRefresh = True

IsConnected Retorna true se a propriedade MaintainConnection for true. Retorna False se não estiver conectado no momento à sua fonte. Boolean somente leitura.

Dim booIsConnected As Boolean
booIsConnected = ActiveWorkbook.Connections(1).OLEDBConnection.IsConnected

LocalConnection Retorna ou define a sequência de conexão para um arquivo de cubo offline. String de leitura/gravação.

ActiveWorkbook.Connections(1).OLEDBConnection.LocalConnection =

LocaleID Retorna ou define o identificador de localidade da conexão especificada. Leitura/gravação.

ActiveWorkbook.Connections(1).OLEDBConnection.LocaleID = 3082

MaintainConnection Retorna True se a conexão à fonte de dados especificada for mantida após a operação de atualização e até que a pasta de trabalho seja fechada. Boolean de leitura/gravação.

ActiveWorkbook.Connections(1).OLEDBConnection.MaintainConnection = True

MaxDrillthroughRecords Retorna ou define o número máximo de registros a serem recuperados. Long de leitura/gravação.

ActiveWorkbook.Connections(1).OLEDBConnection.MaxDrillthroughRecords =

OLAP Retorna True se a conexão OLE DB for conectada a um servidor de OLAP processamento analítico online. Boolean somente leitura.

Dim booOLAP As Boolean
booOLAP = ActiveWorkbook.Connections(1).OLEDBConnection.OLAP

Parent Retorna o objeto pai do objeto especificado. Somente leitura.

Dim objParent As Object
Set objParent = ActiveWorkbook.Connections(1).OLEDBConnection.Parent

RefreshDate Retorna a data em que a conexão OLE DB foi atualizada pela última vez. Date somente leitura.

Dim dtRefreshDate As Date
dtRefreshDate = ActiveWorkbook.Connections(1).OLEDBConnection.RefreshDate

Refreshing True se uma consulta OLE DB em segundo plano estiver em progresso para a conexão OLE DB especificada. Boolean de leitura/gravação.

Dim booRefreshing As Boolean
booRefreshing = ActiveWorkbook.Connections(1).OLEDBConnection.Refreshing

RefreshOnFileOpen True se a conexão for atualizada automaticamente toda vez que a pasta de trabalho for aberta. O valor padrão é False. Boolean de leitura/gravação.

ActiveWorkbook.Connections(1).OLEDBConnection.RefreshOnFileOpen = True

RefreshPeriod Retorna ou define o número de minutos entre as atualizações. Long de leitura/gravação.

ActiveWorkbook.Connections(1).OLEDBConnection.RefreshPeriod =

RetrieveInOfficeUILang True se os dados e os erros devem ser recuperados no idioma de exibição da interface de usuário do Office quando disponível. Boolean de leitura/gravação.

ActiveWorkbook.Connections(1).OLEDBConnection.RetrieveInOfficeUILang = True

RobustConnect Retorna ou define como uma conexão OLE DB se conecta à sua fonte de dados. Leitura/gravação XlRobustConnect.

ActiveWorkbook.Connections(1).OLEDBConnection.RobustConnect = xlAlways

SavePassword True se a informação de senha de uma sequência de conexão OLE DB for salva na sequência de conexão. False se a senha for removida. Boolean de leitura/gravação.

ActiveWorkbook.Connections(1).OLEDBConnection.SavePassword = True

ServerCredentialsMethod Retorna ou define o tipo de credenciais que devem ser usadas para autenticação do servidor. Leitura/gravação XlCredentialsMethod.

ActiveWorkbook.Connections(1).OLEDBConnection.ServerCredentialsMethod = xlCredentialsMethodIntegrated

ServerFillColor True se o formato da cor de preenchimento do servidor OLAP for recuperado do servidor durante o uso da conexão especificada. Boolean de leitura/gravação.

ActiveWorkbook.Connections(1).OLEDBConnection.ServerFillColor = True

ServerFontStyle True se o formato de estilo de fonte do servidor OLAP for recuperado do servidor durante o uso da conexão especificada. Boolean de leitura/gravação.

ActiveWorkbook.Connections(1).OLEDBConnection.ServerFontStyle = True

ServerNumberFormat True se o formato de número do servidor OLAP for recuperado do servidor durante o uso da conexão especificada. Boolean de leitura/gravação.

ActiveWorkbook.Connections(1).OLEDBConnection.ServerNumberFormat = True

ServerSSOApplicationID Retorna ou define um identificador de aplicativo de SSO logon único que é usado para fazer uma busca por credenciais no banco de dados SSO. String de leitura/gravação.

ActiveWorkbook.Connections(1).OLEDBConnection.ServerSSOApplicationID =

ServerTextColor True se o formato da cor do texto do servidor OLAP for recuperado do servidor durante o uso da conexão especificada. Boolean de leitura/gravação.

ActiveWorkbook.Connections(1).OLEDBConnection.ServerTextColor = True

SourceConnectionFile Retorna ou define um String que indica o arquivo Microsoft Office Data Connection ou semelhante usado para criar a conexão. Leitura/gravação.

ActiveWorkbook.Connections(1).OLEDBConnection.SourceConnectionFile =

SourceDataFile Retorna ou define um String que indica o arquivo da fonte de dados para uma conexão OLE DB. Leitura/gravação.

ActiveWorkbook.Connections(1).OLEDBConnection.SourceDataFile =

UseLocalConnection True se a propriedade LocalConnection for usada para especificar a sequência de caracteres que permite ao Microsoft Excel conectar-se a uma fonte de dados. False se a sequência de conexão especificada pela propriedade Connection for usada. Boolean de leitura/gravação.

ActiveWorkbook.Connections(1).OLEDBConnection.UseLocalConnection = True