Model.DataModelConnection (Excel)
Devuelve el objeto del modelo WorkbookConnection de la colección de conexiones del libro que se conecta al modelo.
Dim wbconDataModelConnection As WorkbookConnection
Set wbconDataModelConnection = ActiveWorkbook.Model.DataModelConnection