Corrigé 7.14 Mettre à jour des données consolidées à l’ouverture du classeur

Sub Workbook_Open()  
  Dim strChemin As String  
  strChemin = ThisWorkbook.Path  
  Workbooks.Open Filename:=strChemin...