Log("Début Excel")
Set objExcel = CreateObject("Excel.Application") 'Ouverture d'un Excel
objExcel.Visible = true
Log(Err & " objExcel.Visible")
objExcel.DisplayAlerts = False 'Pas de notification
Log(Err & " DisplayAlerts")
Set objWorkbook = objExcel.Workbooks.Open("Y:\...\Dispo.xlsb")
Log(Err & " Workbooks.Open")
objExcel.Run "RunAutoViaVBS"
Log(Err & " RunAutoViaVBS")
objWorkbook.Close...