OLEDBConnection.IsConnected (Excel)

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

A propriedade IsConnected não verifica se a conexão está conectada. Mesmo se essa propriedade retornar true, o envio de comandos para o provedor poderá resultar em um erro se a conexão não for mais válida.

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