Clase ModelConnection (Excel VBA)
Contiene información sobre el nuevo tipo de conexión de modelo que se presenta en Excel 2013 para interactuar con el modelo de datos integrado. Para usar una variable de clase ModelConnection, primero debe ser instanciado, por ejemplo
Dim mcn as ModelConnection
Set mcn = ActiveWorkbook.Connections(1).ModelConnection
ADOConnection
El objeto ADOConnection se utiliza para crear una conexión abierta a un origen de datos.
Dim adoADOConnection As ADOConnection
adoADOConnection = ActiveWorkbook.Connections(1).ModelConnection.ADOConnection
CalculatedMembers
Devuelve un objeto CalculatedMembers que representa los miembros calculados de la conexión del modelo.
Dim cmsCalculatedMembers As CalculatedMembers
Set cmsCalculatedMembers = ActiveWorkbook.Connections(1).ModelConnection.CalculatedMembers
CommandText
Devuelve o establece la cadena de comandos del origen de datos especificado.
El texto del comando es un nombre de tabla (de una tabla de modelos) o una expresión DAX que evalúa a una tabla.
ActiveWorkbook.Connections(1).ModelConnection.CommandText =
CommandType
Devuelve o establece una de las constantes de enumeración XlCmdType . Posibles valores de retorno son xlCmdCube - Contiene un nombre de cubo para un origen de datos OLAP, xlCmdDAX - Contiene una fórmula de expresiones de análisis de datos (DAX), xlCmdDefault - Contiene texto de comandos comprensible para el proveedor OLE DB, xlCmdExcel - Contiene una fórmula de Excel, xlCmdList - Contiene un puntero a datos de lista, xlCmdSql - Contiene una instrucción SQL, xlCmdTable - Contiene un nombre de tabla para obtener acceso a orígenes de datos OLE DB, xlCmdTableCollection - Contiene el nombre de una colección de tablas.
Para un objeto ModelConnection , este tipo se establecerá en xlCmdTable o xlCmdDAX.
ActiveWorkbook.Connections(1).ModelConnection.CommandType = xlCmdCube