Model.DataModelConnection (Excel)
Renvoie l'objet de modèle WorkbookConnection à partir de la collection de connexions de classeurs qui se connecte au modèle.
Dim wbconDataModelConnection As WorkbookConnection
Set wbconDataModelConnection = ActiveWorkbook.Model.DataModelConnection