OLEDBConnection.OLAP (Excel)

Devuelve True si la conexión OLE DB está conectada a un servidor OLAP (Online Analytical Processing ).

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